home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 May / macformat-024.iso / Shareware City / HyperCard / hyper-info-20-hc / HyperInfo Stacks / List (Collection)
HyperCard Stack  |  1994-12-30  |  20.9 KB  |  [STAK/WILD]

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: HyperCard Stack (archive/hypercard).

You can browse this item here: List (Collection)

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert HyperCard Stack (archive/hypercard) magic Supported
100% file data default
100% TrID HyperCard Stack default


id metadata
keyvalue
macFileType[STAK]
macFileCreator[WILD]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 0e 00 53 54 41 4b | ff ff ff ff 00 00 00 00 |....STAK|........|
|00000010| 00 00 00 0a 00 00 53 a0 | 00 00 0e 00 00 00 00 00 |......S.|........|
|00000020| 00 00 00 00 00 00 00 02 | 00 00 0a 59 00 00 00 04 |........|...Y....|
|00000030| 00 00 0b 2d 00 00 08 2f | 00 00 00 00 00 00 00 00 |...-.../|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 05 00 00 10 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 02 20 80 00 02 20 80 00 | 02 20 80 00 02 20 80 00 |. ... ..|. ... ..|
|00000070| db d8 ad ec 00 00 00 00 | 00 40 00 80 02 40 02 80 |........|.@...@..|
|00000080| 00 00 00 00 02 70 03 40 | 00 00 00 00 00 00 00 00 |.....p.@|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 0d a1 00 00 0c be | 02 00 02 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|000002d0| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|000002e0| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|000002f0| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000300| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000310| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|00000320| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|00000330| c4 80 0c 68 43 02 30 26 | b1 30 03 1b d8 c0 0c 8d |...hC.0&|.0......|
|00000340| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|00000350| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|00000360| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|00000370| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000380| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000390| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|000003a0| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|000003b0| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|000003c0| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|000003d0| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|000003e0| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|000003f0| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 6f 6e 20 6f 70 65 6e 53 | 74 61 63 6b 0d 67 6c 6f |on openS|tack.glo|
|00000610| 62 61 6c 20 67 6c 6f 62 | 61 6c 4c 6f 6e 67 2c 67 |bal glob|alLong,g|
|00000620| 6c 6f 62 61 6c 53 68 6f | 72 74 0d 73 74 61 72 74 |lobalSho|rt.start|
|00000630| 20 75 73 69 6e 67 20 73 | 74 61 63 6b 20 67 6c 6f | using s|tack glo|
|00000640| 62 61 6c 4c 6f 6e 67 0d | 70 61 73 73 20 6f 70 65 |balLong.|pass ope|
|00000650| 6e 53 74 61 63 6b 0d 65 | 6e 64 20 6f 70 65 6e 53 |nStack.e|nd openS|
|00000660| 74 61 63 6b 0d 0d 66 75 | 6e 63 74 69 6f 6e 20 6d |tack..fu|nction m|
|00000670| 61 6b 65 4c 69 73 74 0d | 69 66 20 28 22 a5 22 20 |akeList.|if ("." |
|00000680| 69 73 20 69 6e 20 74 68 | 65 20 73 68 6f 72 74 20 |is in th|e short |
|00000690| 6e 61 6d 65 20 6f 66 20 | 74 68 69 73 20 63 64 29 |name of |this cd)|
|000006a0| 20 74 68 65 6e 0d 70 75 | 74 20 64 72 61 77 46 69 | then.pu|t drawFi|
|000006b0| 67 75 72 65 28 22 6f 76 | 61 6c 22 2c 22 31 22 2c |gure("ov|al","1",|
|000006c0| 22 31 32 22 2c 2c 22 66 | 69 6c 6c 55 70 22 29 20 |"12",,"f|illUp") |
|000006d0| 69 6e 74 6f 20 6e 75 6c | 6c 0d 73 65 6e 64 20 28 |into nul|l.send (|
|000006e0| 22 6f 70 65 6e 43 61 72 | 64 22 29 20 74 6f 20 74 |"openCar|d") to t|
|000006f0| 68 69 73 20 63 64 0d 65 | 6c 73 65 20 69 66 20 28 |his cd.e|lse if (|
|00000700| 22 24 53 79 73 74 65 6d | 20 49 6e 66 6f 20 7c 22 |"$System| Info |"|
|00000710| 20 69 73 20 69 6e 20 22 | 24 22 20 26 20 74 68 65 | is in "|$" & the|
|00000720| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|00000730| 68 69 73 20 63 64 29 20 | 74 68 65 6e 0d 70 75 74 |his cd) |then.put|
|00000740| 20 74 68 65 20 69 74 65 | 6d 44 65 6c 69 6d 69 74 | the ite|mDelimit|
|00000750| 65 72 20 69 6e 74 6f 20 | 6f 72 69 67 69 6e 61 6c |er into |original|
|00000760| 53 65 74 74 69 6e 67 0d | 73 65 74 20 74 68 65 20 |Setting.|set the |
|00000770| 69 74 65 6d 44 65 6c 69 | 6d 69 74 65 72 20 74 6f |itemDeli|miter to|
|00000780| 20 22 7c 22 0d 70 75 74 | 20 6c 61 73 74 20 69 74 | "|".put| last it|
|00000790| 65 6d 20 6f 66 20 62 67 | 20 66 6c 64 20 22 54 69 |em of bg| fld "Ti|
|000007a0| 74 6c 65 22 20 69 6e 74 | 6f 20 66 6f 6c 64 65 72 |tle" int|o folder|
|000007b0| 31 0d 73 65 74 20 74 68 | 65 20 69 74 65 6d 44 65 |1.set th|e itemDe|
|000007c0| 6c 69 6d 69 74 65 72 20 | 74 6f 20 6f 72 69 67 69 |limiter |to origi|
|000007d0| 6e 61 6c 53 65 74 74 69 | 6e 67 0d 64 65 6c 65 74 |nalSetti|ng.delet|
|000007e0| 65 20 63 68 61 72 20 31 | 20 6f 66 20 66 6f 6c 64 |e char 1| of fold|
|000007f0| 65 72 31 0d 70 75 74 20 | 74 6f 64 61 79 73 44 61 |er1.put |todaysDa|
|00000800| 74 65 28 29 20 26 20 72 | 65 74 75 72 6e 20 26 20 |te() & r|eturn & |
|00000810| 22 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |"-------|--------|
|00000820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000850| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000860| 2d 2d 22 20 26 20 72 65 | 74 75 72 6e 20 69 6e 74 |--" & re|turn int|
|00000870| 6f 20 74 68 65 54 65 78 | 74 0d 70 75 74 20 6c 69 |o theTex|t.put li|
|00000880| 73 74 46 69 6c 65 73 28 | 66 6f 6c 64 65 72 31 2c |stFiles(|folder1,|
|00000890| 29 20 69 6e 74 6f 20 66 | 69 6c 65 73 31 0d 72 65 |) into f|iles1.re|
|000008a0| 70 65 61 74 20 77 69 74 | 68 20 69 20 3d 20 31 20 |peat wit|h i = 1 |
|000008b0| 74 6f 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 |to the n|umber of|
|000008c0| 20 6c 69 6e 65 73 20 6f | 66 20 66 69 6c 65 73 31 | lines o|f files1|
|000008d0| 0d 69 66 20 28 6c 69 6e | 65 20 69 20 6f 66 20 66 |.if (lin|e i of f|
|000008e0| 69 6c 65 73 31 20 69 73 | 20 6e 6f 74 20 22 54 72 |iles1 is| not "Tr|
|000008f0| 61 73 68 22 29 20 74 68 | 65 6e 0d 70 75 74 20 74 |ash") th|en.put t|
|00000900| 68 65 54 65 78 74 20 26 | 20 74 65 78 74 53 68 69 |heText &| textShi|
|00000910| 66 74 28 22 72 69 67 68 | 74 22 2c 22 a5 20 22 2c |ft("righ|t",". ",|
|00000920| 6c 69 6e 65 20 69 20 6f | 66 20 66 69 6c 65 73 31 |line i o|f files1|
|00000930| 29 20 69 6e 74 6f 20 74 | 68 65 54 65 78 74 0d 70 |) into t|heText.p|
|00000940| 75 74 20 66 6f 6c 64 65 | 72 31 20 26 20 6c 69 6e |ut folde|r1 & lin|
|00000950| 65 20 69 20 6f 66 20 66 | 69 6c 65 73 31 20 26 20 |e i of f|iles1 & |
|00000960| 22 3a 22 20 69 6e 74 6f | 20 66 6f 6c 64 65 72 32 |":" into| folder2|
|00000970| 0d 69 66 20 28 74 68 65 | 72 65 20 69 73 20 61 20 |.if (the|re is a |
|00000980| 66 6f 6c 64 65 72 20 66 | 6f 6c 64 65 72 32 29 20 |folder f|older2) |
|00000990| 74 68 65 6e 0d 70 75 74 | 20 6c 69 73 74 46 69 6c |then.put| listFil|
|000009a0| 65 73 28 66 6f 6c 64 65 | 72 32 2c 29 20 69 6e 74 |es(folde|r2,) int|
|000009b0| 6f 20 66 69 6c 65 73 32 | 0d 72 65 70 65 61 74 20 |o files2|.repeat |
|000009c0| 77 69 74 68 20 6a 20 3d | 20 31 20 74 6f 20 74 68 |with j =| 1 to th|
|000009d0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6c 69 6e 65 |e number| of line|
|000009e0| 73 20 6f 66 20 66 69 6c | 65 73 32 0d 70 75 74 20 |s of fil|es2.put |
|000009f0| 74 68 65 54 65 78 74 20 | 26 20 74 65 78 74 53 68 |theText |& textSh|
|00000a00| 69 66 74 28 22 72 69 67 | 68 74 22 2c 22 20 20 a5 |ift("rig|ht"," .|
|00000a10| 20 22 2c 6c 69 6e 65 20 | 6a 20 6f 66 20 66 69 6c | ",line |j of fil|
|00000a20| 65 73 32 29 20 69 6e 74 | 6f 20 74 68 65 54 65 78 |es2) int|o theTex|
|00000a30| 74 0d 70 75 74 20 66 6f | 6c 64 65 72 32 20 26 20 |t.put fo|lder2 & |
|00000a40| 6c 69 6e 65 20 6a 20 6f | 66 20 66 69 6c 65 73 32 |line j o|f files2|
|00000a50| 20 26 20 22 3a 22 20 69 | 6e 74 6f 20 66 6f 6c 64 | & ":" i|nto fold|
|00000a60| 65 72 33 0d 69 66 20 28 | 74 68 65 72 65 20 69 73 |er3.if (|there is|
|00000a70| 20 61 20 66 6f 6c 64 65 | 72 20 66 6f 6c 64 65 72 | a folde|r folder|
|00000a80| 33 29 20 74 68 65 6e 0d | 70 75 74 20 6c 69 73 74 |3) then.|put list|
|00000a90| 46 69 6c 65 73 28 66 6f | 6c 64 65 72 33 2c 29 20 |Files(fo|lder3,) |
|00000aa0| 69 6e 74 6f 20 66 69 6c | 65 73 33 0d 70 75 74 20 |into fil|es3.put |
|00000ab0| 74 68 65 54 65 78 74 20 | 26 20 74 65 78 74 53 68 |theText |& textSh|
|00000ac0| 69 66 74 28 22 72 69 67 | 68 74 22 2c 22 20 20 20 |ift("rig|ht"," |
|00000ad0| 20 a5 20 22 2c 66 69 6c | 65 73 33 29 20 69 6e 74 | . ",fil|es3) int|
|00000ae0| 6f 20 74 68 65 54 65 78 | 74 0d 65 6e 64 20 69 66 |o theTex|t.end if|
|00000af0| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 65 6e 64 20 |.end rep|eat.end |
|00000b00| 69 66 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 72 65 |if.end i|f.end re|
|00000b10| 70 65 61 74 0d 70 75 74 | 20 74 68 65 54 65 78 74 |peat.put| theText|
|00000b20| 20 69 6e 74 6f 20 20 62 | 67 20 66 6c 64 20 22 54 | into b|g fld "T|
|00000b30| 65 78 74 22 0d 73 65 74 | 20 74 68 65 20 73 63 72 |ext".set| the scr|
|00000b40| 6f 6c 6c 20 6f 66 20 62 | 67 20 66 6c 64 20 22 54 |oll of b|g fld "T|
|00000b50| 65 78 74 22 20 74 6f 20 | 30 0d 65 6e 64 20 69 66 |ext" to |0.end if|
|00000b60| 0d 65 6e 64 20 6d 61 6b | 65 4c 69 73 74 0d 0d 66 |.end mak|eList..f|
|00000b70| 75 6e 63 74 69 6f 6e 20 | 74 65 78 74 54 6f 44 6f |unction |textToDo|
|00000b80| 44 6f 6e 65 20 74 68 65 | 46 6c 64 2c 74 68 65 54 |Done the|Fld,theT|
|00000b90| 65 78 74 0d 70 75 74 20 | 74 68 65 20 69 74 65 6d |ext.put |the item|
|00000ba0| 44 65 6c 69 6d 69 74 65 | 72 20 69 6e 74 6f 20 6f |Delimite|r into o|
|00000bb0| 72 69 67 69 6e 61 6c 53 | 65 74 74 69 6e 67 0d 73 |riginalS|etting.s|
|00000bc0| 65 74 20 74 68 65 20 69 | 74 65 6d 44 65 6c 69 6d |et the i|temDelim|
|00000bd0| 69 74 65 72 20 74 6f 20 | 22 3a 22 0d 70 75 74 20 |iter to |":".put |
|00000be0| 66 69 72 73 74 20 69 74 | 65 6d 20 6f 66 20 74 68 |first it|em of th|
|00000bf0| 65 20 73 68 6f 72 74 20 | 6e 61 6d 65 20 6f 66 20 |e short |name of |
|00000c00| 74 68 69 73 20 63 64 20 | 69 6e 74 6f 20 74 68 65 |this cd |into the|
|00000c10| 54 69 74 6c 65 0d 70 75 | 74 20 6c 61 73 74 20 20 |Title.pu|t last |
|00000c20| 69 74 65 6d 20 6f 66 20 | 74 68 65 20 73 68 6f 72 |item of |the shor|
|00000c30| 74 20 6e 61 6d 65 20 6f | 66 20 74 68 69 73 20 63 |t name o|f this c|
|00000c40| 64 20 69 6e 74 6f 20 74 | 68 65 44 6f 0d 73 65 74 |d into t|heDo.set|
|00000c50| 20 74 68 65 20 69 74 65 | 6d 44 65 6c 69 6d 69 74 | the ite|mDelimit|
|00000c60| 65 72 20 74 6f 20 6f 72 | 69 67 69 6e 61 6c 53 65 |er to or|iginalSe|
|00000c70| 74 74 69 6e 67 0d 69 66 | 20 28 74 68 65 44 6f 20 |tting.if| (theDo |
|00000c80| 69 73 20 6e 6f 74 20 22 | 22 29 20 74 68 65 6e 0d |is not "|") then.|
|00000c90| 69 66 20 20 20 20 20 20 | 28 74 68 65 44 6f 20 69 |if |(theDo i|
|00000ca0| 73 20 22 54 6f 44 6f 22 | 29 20 74 68 65 6e 20 70 |s "ToDo"|) then p|
|00000cb0| 75 74 20 74 68 65 54 69 | 74 6c 65 20 26 20 22 3a |ut theTi|tle & ":|
|00000cc0| 44 6f 6e 65 22 20 69 6e | 74 6f 20 74 68 65 54 6f |Done" in|to theTo|
|00000cd0| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 44 6f 20 |.else if| (theDo |
|00000ce0| 69 73 20 22 44 6f 6e 65 | 22 29 20 74 68 65 6e 20 |is "Done|") then |
|00000cf0| 70 75 74 20 74 68 65 54 | 69 74 6c 65 20 26 20 22 |put theT|itle & "|
|00000d00| 3a 54 6f 44 6f 22 20 69 | 6e 74 6f 20 74 68 65 54 |:ToDo" i|nto theT|
|00000d10| 6f 0d 69 66 20 28 74 68 | 65 72 65 20 69 73 20 61 |o.if (th|ere is a|
|00000d20| 20 63 64 20 74 68 65 54 | 6f 29 20 74 68 65 6e 0d | cd theT|o) then.|
|00000d30| 64 65 6c 65 74 65 20 74 | 68 65 20 73 65 6c 65 63 |delete t|he selec|
|00000d40| 74 65 64 43 68 75 6e 6b | 0d 73 65 6e 64 20 28 22 |tedChunk|.send ("|
|00000d50| 70 75 74 20 74 68 65 54 | 65 78 74 20 61 66 74 65 |put theT|ext afte|
|00000d60| 72 20 74 68 65 46 6c 64 | 20 6f 66 20 63 64 20 74 |r theFld| of cd t|
|00000d70| 68 65 54 6f 22 29 20 74 | 6f 20 48 79 70 65 72 43 |heTo") t|o HyperC|
|00000d80| 61 72 64 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 69 |ard.end |if.end i|
|00000d90| 66 0d 65 6e 64 20 74 65 | 78 74 54 6f 44 6f 44 6f |f.end te|xtToDoDo|
|00000da0| 6e 65 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ne......|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 02 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 80 2f 00 00 84 bb | 00 00 c4 59 00 02 02 2d |.../....|...Y...-|
|00000e30| 00 02 99 be 00 02 9a a1 | 00 01 55 02 00 02 8b cf |........|..U.....|
|00000e40| 00 02 8f ce 00 02 87 99 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001000| 00 00 00 80 4c 49 53 54 | 00 00 08 2f 00 00 00 00 |....LIST|.../....|
|00001010| 00 00 00 01 00 00 08 00 | 00 00 00 04 00 10 00 02 |........|........|
|00001020| 00 03 00 03 60 00 01 3b | 00 00 00 04 00 00 00 00 |....`..;|........|
|00001030| 00 00 09 bb 00 04 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001080| 00 00 08 00 50 41 47 45 | 00 00 09 bb 00 00 00 00 |....PAGE|........|
|00001090| 00 00 08 2f 7b 50 02 62 | 00 00 0b 2d e0 12 34 ac |.../{P.b|...-..4.|
|000010a0| 01 c2 c5 02 33 40 33 40 | 00 00 11 99 e0 00 02 2c |....3@3@|.......,|
|000010b0| 01 08 84 80 10 d0 34 e0 | 00 00 0f cf a0 00 18 09 |......4.|........|
|000010c0| 21 02 c0 02 62 52 20 00 | 00 00 10 ce a0 3e 34 c9 |!...bR .|.....>4.|
|000010d0| ad cf 77 d1 21 4c 13 80 | 00 00 00 00 00 00 00 00 |..w.!L..|........|
|000010e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001680| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001880| 00 00 12 20 42 4b 47 44 | 00 00 0a 59 00 00 00 00 |... BKGD|...Y....|
|00001890| 00 00 00 00 40 00 00 00 | 00 00 00 01 00 00 0e 02 |....@...|........|
|000018a0| 00 00 0e 02 00 04 00 04 | 00 00 11 5a 00 02 00 00 |........|...Z....|
|000018b0| 00 8a 10 de 00 01 01 00 | 01 f0 00 00 02 00 02 00 |........|........|
|000018c0| a0 0b 00 78 00 00 00 00 | 00 16 00 0a 01 00 00 0d |...x....|........|
|000018d0| 2a 20 41 63 74 69 6f 6e | 00 00 6f 6e 20 6d 6f 75 |* Action|..on mou|
|000018e0| 73 65 55 70 0d 67 6c 6f | 62 61 6c 20 67 6c 6f 62 |seUp.glo|bal glob|
|000018f0| 61 6c 43 68 75 6e 6b 2c | 67 6c 6f 62 61 6c 46 6c |alChunk,|globalFl|
|00001900| 64 2c 67 6c 6f 62 61 6c | 54 65 78 74 0d 6c 6f 63 |d,global|Text.loc|
|00001910| 6b 20 6d 65 73 73 61 67 | 65 73 0d 6c 6f 63 6b 20 |k messag|es.lock |
|00001920| 73 63 72 65 65 6e 0d 73 | 65 74 20 74 68 65 20 63 |screen.s|et the c|
|00001930| 75 72 73 6f 72 20 74 6f | 20 62 75 73 79 0d 70 75 |ursor to| busy.pu|
|00001940| 74 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 54 65 |t the se|lectedTe|
|00001950| 78 74 20 6f 66 20 74 68 | 65 20 74 61 72 67 65 74 |xt of th|e target|
|00001960| 20 69 6e 74 6f 20 74 68 | 65 41 63 74 69 6f 6e 0d | into th|eAction.|
|00001970| 69 66 20 20 20 20 20 20 | 28 22 24 2a 24 22 20 69 |if |("$*$" i|
|00001980| 73 20 69 6e 20 22 24 22 | 20 26 20 74 68 65 41 63 |s in "$"| & theAc|
|00001990| 74 69 6f 6e 20 26 20 22 | 24 22 29 20 74 68 65 6e |tion & "|$") then|
|000019a0| 0d 61 6e 73 77 65 72 20 | 22 54 68 69 73 20 66 75 |.answer |"This fu|
|000019b0| 6e 63 74 69 6f 6e 20 69 | 73 20 61 63 68 69 65 76 |nction i|s achiev|
|000019c0| 65 64 20 62 79 20 61 20 | 6b 65 79 20 63 6f 6d 62 |ed by a |key comb|
|000019d0| 69 6e 61 74 69 6f 6e 2e | 22 0d 65 6c 73 65 20 69 |ination.|".else i|
|000019e0| 66 20 28 74 68 65 41 63 | 74 69 6f 6e 20 69 73 20 |f (theAc|tion is |
|000019f0| 22 43 72 65 61 74 65 20 | 4e 65 77 20 44 69 72 65 |"Create |New Dire|
|00001a00| 63 74 6f 72 79 22 29 20 | 74 68 65 6e 0d 67 6f 20 |ctory") |then.go |
|00001a10| 62 67 20 22 33 22 0d 73 | 65 6e 64 20 28 22 64 6f |bg "3".s|end ("do|
|00001a20| 4d 65 6e 75 20 22 20 26 | 20 71 75 6f 74 65 20 26 |Menu " &| quote &|
|00001a30| 20 22 4e 65 77 20 43 61 | 72 64 22 20 26 20 71 75 | "New Ca|rd" & qu|
|00001a40| 6f 74 65 20 26 20 22 2c | 22 20 26 20 71 75 6f 74 |ote & ",|" & quot|
|00001a50| 65 20 26 20 22 45 64 69 | 74 22 20 26 20 71 75 6f |e & "Edi|t" & quo|
|00001a60| 74 65 29 20 74 6f 20 48 | 79 70 65 72 43 61 72 64 |te) to H|yperCard|
|00001a70| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00001a80| 69 6f 6e 20 69 73 20 22 | 43 72 65 61 74 65 20 4e |ion is "|Create N|
|00001a90| 65 77 20 4c 69 73 74 22 | 29 20 74 68 65 6e 0d 67 |ew List"|) then.g|
|00001aa0| 6f 20 62 67 20 22 32 22 | 0d 73 65 6e 64 20 28 22 |o bg "2"|.send ("|
|00001ab0| 64 6f 4d 65 6e 75 20 22 | 20 26 20 71 75 6f 74 65 |doMenu "| & quote|
|00001ac0| 20 26 20 22 4e 65 77 20 | 43 61 72 64 22 20 26 20 | & "New |Card" & |
|00001ad0| 71 75 6f 74 65 20 26 20 | 22 2c 22 20 26 20 71 75 |quote & |"," & qu|
|00001ae0| 6f 74 65 20 26 20 22 45 | 64 69 74 22 20 26 20 71 |ote & "E|dit" & q|
|00001af0| 75 6f 74 65 29 20 74 6f | 20 48 79 70 65 72 43 61 |uote) to| HyperCa|
|00001b00| 72 64 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |rd.else |if (theA|
|00001b10| 63 74 69 6f 6e 20 69 73 | 20 22 43 72 65 61 74 65 |ction is| "Create|
|00001b20| 20 4e 65 77 20 4d 61 69 | 6c 62 6f 78 22 29 20 74 | New Mai|lbox") t|
|00001b30| 68 65 6e 0d 70 75 74 20 | 63 72 65 61 74 65 4d 61 |hen.put |createMa|
|00001b40| 69 6c 62 6f 78 28 29 20 | 69 6e 74 6f 20 6e 75 6c |ilbox() |into nul|
|00001b50| 6c 0d 65 6c 73 65 20 69 | 66 20 28 74 68 65 41 63 |l.else i|f (theAc|
|00001b60| 74 69 6f 6e 20 69 73 20 | 22 43 72 65 61 74 65 20 |tion is |"Create |
|00001b70| 4e 65 77 20 4d 65 73 73 | 61 67 65 22 29 20 74 68 |New Mess|age") th|
|00001b80| 65 6e 0d 70 75 74 20 63 | 72 65 61 74 65 4d 65 73 |en.put c|reateMes|
|00001b90| 73 61 67 65 28 29 20 69 | 6e 74 6f 20 6e 75 6c 6c |sage() i|nto null|
|00001ba0| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00001bb0| 69 6f 6e 20 69 73 20 22 | 43 72 65 61 74 65 20 4e |ion is "|Create N|
|00001bc0| 65 77 20 4f 62 6a 65 63 | 74 22 29 20 74 68 65 6e |ew Objec|t") then|
|00001bd0| 0d 67 6f 20 62 67 20 22 | 32 22 0d 73 65 6e 64 20 |.go bg "|2".send |
|00001be0| 28 22 64 6f 4d 65 6e 75 | 20 22 20 26 20 71 75 6f |("doMenu| " & quo|
|00001bf0| 74 65 20 26 20 22 4e 65 | 77 20 43 61 72 64 22 20 |te & "Ne|w Card" |
|00001c00| 26 20 71 75 6f 74 65 20 | 26 20 22 2c 22 20 26 20 |& quote |& "," & |
|00001c10| 71 75 6f 74 65 20 26 20 | 22 45 64 69 74 22 20 26 |quote & |"Edit" &|
|00001c20| 20 71 75 6f 74 65 29 20 | 74 6f 20 48 79 70 65 72 | quote) |to Hyper|
|00001c30| 43 61 72 64 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |Card.els|e if (th|
|00001c40| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 44 69 61 6c |eAction |is "Dial|
|00001c50| 20 54 65 6c 65 70 68 6f | 6e 65 20 4e 75 6d 62 65 | Telepho|ne Numbe|
|00001c60| 72 22 29 20 74 68 65 6e | 0d 70 75 74 20 64 69 61 |r") then|.put dia|
|00001c70| 6c 54 65 6c 65 70 68 6f | 6e 65 28 29 20 69 6e 74 |lTelepho|ne() int|
|00001c80| 6f 20 6e 75 6c 6c 0d 65 | 6c 73 65 20 69 66 20 28 |o null.e|lse if (|
|00001c90| 74 68 65 41 63 74 69 6f | 6e 20 69 73 20 22 46 69 |theActio|n is "Fi|
|00001ca0| 6c 65 20 69 6e 74 6f 20 | 4d 61 69 6c 62 6f 78 22 |le into |Mailbox"|
|00001cb0| 29 20 74 68 65 6e 0d 70 | 75 74 20 66 69 6c 65 4d |) then.p|ut fileM|
|00001cc0| 61 69 6c 62 6f 78 28 29 | 20 69 6e 74 6f 20 6e 75 |ailbox()| into nu|
|00001cd0| 6c 6c 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |ll.else |if (theA|
|00001ce0| 63 74 69 6f 6e 20 69 73 | 20 22 46 6c 69 70 20 41 |ction is| "Flip A|
|00001cf0| 73 63 65 6e 64 69 6e 67 | 2f 44 65 73 63 65 6e 64 |scending|/Descend|
|00001d00| 69 6e 67 22 29 20 74 68 | 65 6e 0d 70 75 74 20 66 |ing") th|en.put f|
|00001d10| 6c 69 70 54 68 65 6d 28 | 62 67 20 66 6c 64 20 22 |lipThem(|bg fld "|
|00001d20| 46 6c 69 70 22 29 20 69 | 6e 74 6f 20 6e 75 6c 6c |Flip") i|nto null|
|00001d30| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00001d40| 69 6f 6e 20 69 73 20 22 | 46 6c 69 70 20 45 6e 76 |ion is "|Flip Env|
|00001d50| 65 6c 6f 70 65 2f 43 6f | 6e 74 65 6e 74 22 29 20 |elope/Co|ntent") |
|00001d60| 74 68 65 6e 0d 70 75 74 | 20 66 6c 69 70 54 68 65 |then.put| flipThe|
|00001d70| 6d 28 62 67 20 66 6c 64 | 20 22 46 6c 69 70 22 29 |m(bg fld| "Flip")|
|00001d80| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6c 73 65 20 | into nu|ll.else |
|00001d90| 69 66 20 28 74 68 65 41 | 63 74 69 6f 6e 20 69 73 |if (theA|ction is|
|00001da0| 20 22 46 6c 69 70 20 53 | 69 6e 67 6c 65 2f 44 6f | "Flip S|ingle/Do|
|00001db0| 75 62 6c 65 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |uble") t|hen.put |
|00001dc0| 66 6c 69 70 54 68 65 6d | 28 62 67 20 66 6c 64 20 |flipThem|(bg fld |
|00001dd0| 22 46 6c 69 70 22 29 20 | 69 6e 74 6f 20 6e 75 6c |"Flip") |into nul|
|00001de0| 6c 0d 65 6c 73 65 20 69 | 66 20 28 74 68 65 41 63 |l.else i|f (theAc|
|00001df0| 74 69 6f 6e 20 69 73 20 | 22 46 6f 72 6d 61 74 20 |tion is |"Format |
|00001e00| 4d 61 69 6c 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |Mail") t|hen.put |
|00001e10| 66 6f 72 6d 61 74 4d 61 | 69 6c 28 29 20 69 6e 74 |formatMa|il() int|
|00001e20| 6f 20 6e 75 6c 6c 0d 65 | 6c 73 65 20 69 66 20 28 |o null.e|lse if (|
|00001e30| 74 68 65 41 63 74 69 6f | 6e 20 69 73 20 22 47 6f |theActio|n is "Go|
|00001e40| 20 49 6e 64 65 78 22 29 | 20 74 68 65 6e 0d 73 65 | Index")| then.se|
|00001e50| 6e 64 20 28 22 63 6c 6f | 73 65 43 61 72 64 22 29 |nd ("clo|seCard")|
|00001e60| 20 74 6f 20 74 68 69 73 | 20 63 64 0d 67 6f 20 63 | to this| cd.go c|
|00001e70| 64 20 22 28 49 6e 64 65 | 78 29 22 0d 73 65 6e 64 |d "(Inde|x)".send|
|00001e80| 20 28 22 6f 70 65 6e 43 | 61 72 64 22 29 20 20 74 | ("openC|ard") t|
|00001e90| 6f 20 74 68 69 73 20 63 | 64 0d 65 6c 73 65 20 69 |o this c|d.else i|
|00001ea0| 66 20 28 74 68 65 41 63 | 74 69 6f 6e 20 69 73 20 |f (theAc|tion is |
|00001eb0| 22 49 6e 64 65 78 20 46 | 69 6c 74 65 72 20 49 6e |"Index F|ilter In|
|00001ec0| 22 29 20 74 68 65 6e 0d | 70 75 74 20 69 6e 64 65 |") then.|put inde|
|00001ed0| 78 46 69 6c 74 65 72 28 | 22 69 6e 22 29 20 20 69 |xFilter(|"in") i|
|00001ee0| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6c 73 65 20 69 66 |nto null|.else if|
|00001ef0| 20 28 74 68 65 41 63 74 | 69 6f 6e 20 69 73 20 22 | (theAct|ion is "|
|00001f00| 49 6e 64 65 78 20 46 69 | 6c 74 65 72 20 4f 75 74 |Index Fi|lter Out|
|00001f10| 22 29 20 74 68 65 6e 0d | 70 75 74 20 69 6e 64 65 |") then.|put inde|
|00001f20| 78 46 69 6c 74 65 72 28 | 22 6f 75 74 22 29 20 69 |xFilter(|"out") i|
|00001f30| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6c 73 65 20 69 66 |nto null|.else if|
|00001f40| 20 28 74 68 65 41 63 74 | 69 6f 6e 20 69 73 20 22 | (theAct|ion is "|
|00001f50| 49 6e 73 74 61 6c 6c 20 | 48 61 6e 64 6c 65 72 22 |Install |Handler"|
|00001f60| 29 20 74 68 65 6e 0d 70 | 75 74 20 69 6e 73 74 61 |) then.p|ut insta|
|00001f70| 6c 6c 48 61 6e 64 6c 65 | 72 28 62 67 20 66 6c 64 |llHandle|r(bg fld|
|00001f80| 20 22 54 69 74 6c 65 22 | 29 20 69 6e 74 6f 20 6e | "Title"|) into n|
|00001f90| 75 6c 6c 0d 65 6c 73 65 | 20 69 66 20 28 74 68 65 |ull.else| if (the|
|00001fa0| 41 63 74 69 6f 6e 20 69 | 73 20 22 4d 61 6b 65 20 |Action i|s "Make |
|00001fb0| 4c 69 73 74 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |List") t|hen.put |
|00001fc0| 6d 61 6b 65 4c 69 73 74 | 28 29 20 69 6e 74 6f 20 |makeList|() into |
|00001fd0| 6e 75 6c 6c 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |null.els|e if (th|
|00001fe0| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 4d 61 6b 65 |eAction |is "Make|
|00001ff0| 20 4d 61 69 6c 22 29 20 | 74 68 65 6e 0d 70 75 74 | Mail") |then.put|
|00002000| 20 6d 61 6b 65 4d 61 69 | 6c 28 29 20 69 6e 74 6f | makeMai|l() into|
|00002010| 20 6e 75 6c 6c 0d 65 6c | 73 65 20 69 66 20 28 74 | null.el|se if (t|
|00002020| 68 65 41 63 74 69 6f 6e | 20 69 73 20 22 4d 61 6b |heAction| is "Mak|
|00002030| 65 20 50 72 6f 66 69 6c | 65 22 29 20 74 68 65 6e |e Profil|e") then|
|00002040| 0d 70 75 74 20 6d 61 6b | 65 50 72 6f 66 69 6c 65 |.put mak|eProfile|
|00002050| 28 29 20 69 6e 74 6f 20 | 6e 75 6c 6c 0d 65 6c 73 |() into |null.els|
|00002060| 65 20 69 66 20 28 74 68 | 65 41 63 74 69 6f 6e 20 |e if (th|eAction |
|00002070| 69 73 20 22 4d 61 6b 65 | 20 52 65 61 64 20 4f 6e |is "Make| Read On|
|00002080| 6c 79 3a 44 69 72 65 63 | 74 6f 72 79 20 28 46 61 |ly:Direc|tory (Fa|
|00002090| 6d 69 6c 79 29 22 29 20 | 74 68 65 6e 0d 70 75 74 |mily)") |then.put|
|000020a0| 20 6d 61 6b 65 44 69 72 | 65 63 74 6f 72 79 28 22 | makeDir|ectory("|
|000020b0| 46 61 6d 69 6c 79 22 29 | 20 69 6e 74 6f 20 6e 75 |Family")| into nu|
|000020c0| 6c 6c 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |ll.else |if (theA|
|000020d0| 63 74 69 6f 6e 20 69 73 | 20 22 4d 61 6b 65 20 52 |ction is| "Make R|
|000020e0| 65 61 64 20 4f 6e 6c 79 | 3a 44 69 72 65 63 74 6f |ead Only|:Directo|
|000020f0| 72 79 20 28 4d 65 6d 62 | 65 72 29 22 29 20 74 68 |ry (Memb|er)") th|
|00002100| 65 6e 0d 70 75 74 20 6d | 61 6b 65 44 69 72 65 63 |en.put m|akeDirec|
|00002110| 74 6f 72 79 28 22 4d 65 | 6d 62 65 72 22 29 20 69 |tory("Me|mber") i|
|00002120| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6c 73 65 20 69 66 |nto null|.else if|
|00002130| 20 28 74 68 65 41 63 74 | 69 6f 6e 20 69 73 20 22 | (theAct|ion is "|
|00002140| 4d 61 6b 65 20 52 65 61 | 64 20 4f 6e 6c 79 3a 45 |Make Rea|d Only:E|
|00002150| 6e 76 65 6c 6f 70 65 22 | 29 20 74 68 65 6e 0d 70 |nvelope"|) then.p|
|00002160| 75 74 20 6d 61 6b 65 45 | 6e 76 65 6c 6f 70 65 28 |ut makeE|nvelope(|
|00002170| 29 20 69 6e 74 6f 20 6e | 75 6c 6c 0d 65 6c 73 65 |) into n|ull.else|
|00002180| 20 69 66 20 28 74 68 65 | 41 63 74 69 6f 6e 20 69 | if (the|Action i|
|00002190| 73 20 22 4d 65 73 73 61 | 67 65 2d 50 61 73 73 69 |s "Messa|ge-Passi|
|000021a0| 6e 67 20 48 69 65 72 61 | 72 63 68 79 20 48 69 64 |ng Hiera|rchy Hid|
|000021b0| 65 22 29 20 74 68 65 6e | 0d 70 75 74 20 6d 65 73 |e") then|.put mes|
|000021c0| 73 61 67 65 48 69 65 72 | 61 72 63 68 79 28 22 68 |sageHier|archy("h|
|000021d0| 69 64 65 22 29 20 69 6e | 74 6f 20 6e 75 6c 6c 0d |ide") in|to null.|
|000021e0| 65 6c 73 65 20 69 66 20 | 28 74 68 65 41 63 74 69 |else if |(theActi|
|000021f0| 6f 6e 20 69 73 20 22 4d | 65 73 73 61 67 65 2d 50 |on is "M|essage-P|
|00002200| 61 73 73 69 6e 67 20 48 | 69 65 72 61 72 63 68 79 |assing H|ierarchy|
|00002210| 20 53 68 6f 77 22 29 20 | 74 68 65 6e 0d 70 75 74 | Show") |then.put|
|00002220| 20 6d 65 73 73 61 67 65 | 48 69 65 72 61 72 63 68 | message|Hierarch|
|00002230| 79 28 22 73 68 6f 77 22 | 29 20 69 6e 74 6f 20 6e |y("show"|) into n|
|00002240| 75 6c 6c 0d 65 6c 73 65 | 20 69 66 20 28 74 68 65 |ull.else| if (the|
|00002250| 41 63 74 69 6f 6e 20 69 | 73 20 22 52 65 6d 6f 76 |Action i|s "Remov|
|00002260| 65 20 53 70 61 63 65 22 | 29 20 74 68 65 6e 0d 70 |e Space"|) then.p|
|00002270| 75 74 20 72 65 6d 6f 76 | 65 53 70 61 63 65 28 29 |ut remov|eSpace()|
|00002280| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6c 73 65 20 | into nu|ll.else |
|00002290| 69 66 20 28 74 68 65 41 | 63 74 69 6f 6e 20 69 73 |if (theA|ction is|
|000022a0| 20 22 52 65 6d 6f 76 65 | 20 53 70 61 63 65 20 28 | "Remove| Space (|
|000022b0| 2a 41 6c 6c 2a 29 22 29 | 20 74 68 65 6e 0d 70 75 |*All*)")| then.pu|
|000022c0| 73 68 20 63 64 0d 72 65 | 70 65 61 74 20 77 69 74 |sh cd.re|peat wit|
|000022d0| 68 20 69 20 3d 20 28 74 | 68 65 20 6e 75 6d 62 65 |h i = (t|he numbe|
|000022e0| 72 20 6f 66 20 74 68 69 | 73 20 63 64 20 2b 20 31 |r of thi|s cd + 1|
|000022f0| 29 20 74 6f 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |) to the| number |
|00002300| 6f 66 20 63 64 73 0d 67 | 6f 20 63 64 20 69 0d 70 |of cds.g|o cd i.p|
|00002310| 75 74 20 72 65 6d 6f 76 | 65 53 70 61 63 65 28 29 |ut remov|eSpace()|
|00002320| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6e 64 20 72 | into nu|ll.end r|
|00002330| 65 70 65 61 74 0d 70 6f | 70 20 63 64 0d 65 6c 73 |epeat.po|p cd.els|
|00002340| 65 20 69 66 20 28 74 68 | 65 41 63 74 69 6f 6e 20 |e if (th|eAction |
|00002350| 69 73 20 22 53 68 6f 77 | 20 43 72 65 64 69 74 22 |is "Show| Credit"|
|00002360| 29 20 74 68 65 6e 0d 70 | 75 74 20 73 68 6f 77 43 |) then.p|ut showC|
|00002370| 72 65 64 69 74 28 29 20 | 69 6e 74 6f 20 6e 75 6c |redit() |into nul|
|00002380| 6c 0d 65 6c 73 65 20 69 | 66 20 28 74 68 65 41 63 |l.else i|f (theAc|
|00002390| 74 69 6f 6e 20 69 73 20 | 22 53 6f 72 74 20 43 61 |tion is |"Sort Ca|
|000023a0| 72 64 73 22 29 20 74 68 | 65 6e 0d 73 6f 72 74 20 |rds") th|en.sort |
|000023b0| 63 64 73 20 6f 66 20 74 | 68 69 73 20 73 74 61 63 |cds of t|his stac|
|000023c0| 6b 20 61 73 63 65 6e 64 | 69 6e 67 20 69 6e 74 65 |k ascend|ing inte|
|000023d0| 72 6e 61 74 69 6f 6e 61 | 6c 20 62 79 20 74 68 65 |rnationa|l by the|
|000023e0| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|000023f0| 68 69 73 20 63 64 0d 70 | 75 74 20 22 22 20 69 6e |his cd.p|ut "" in|
|00002400| 74 6f 20 62 67 20 66 6c | 64 20 22 54 65 78 74 22 |to bg fl|d "Text"|
|00002410| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00002420| 69 6f 6e 20 69 73 20 22 | 54 6f 64 61 79 27 73 20 |ion is "|Today's |
|00002430| 44 61 74 65 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |Date") t|hen.put |
|00002440| 74 6f 64 61 79 73 44 61 | 74 65 28 29 20 26 20 22 |todaysDa|te() & "|
|00002450| 20 7c 20 22 20 69 6e 74 | 6f 20 62 67 20 66 6c 64 | | " int|o bg fld|
|00002460| 20 22 54 69 74 6c 65 22 | 0d 70 75 74 20 73 65 74 | "Title"|.put set|
|00002470| 75 70 43 61 72 64 28 29 | 20 69 6e 74 6f 20 6e 75 |upCard()| into nu|
|00002480| 6c 6c 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |ll.else |if (theA|
|00002490| 63 74 69 6f 6e 20 69 73 | 20 22 55 70 64 61 74 65 |ction is| "Update|
|000024a0| 20 49 6e 64 65 78 22 29 | 20 74 68 65 6e 0d 70 75 | Index")| then.pu|
|000024b0| 74 20 22 22 20 69 6e 74 | 6f 20 62 67 20 66 6c 64 |t "" int|o bg fld|
|000024c0| 20 22 54 65 78 74 22 0d | 73 65 6e 64 20 28 22 6f | "Text".|send ("o|
|000024d0| 70 65 6e 43 61 72 64 22 | 29 20 74 6f 20 74 68 69 |penCard"|) to thi|
|000024e0| 73 20 63 64 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |s cd.els|e if (th|
|000024f0| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 55 70 64 61 |eAction |is "Upda|
|00002500| 74 65 20 53 74 61 63 6b | 22 29 20 74 68 65 6e 0d |te Stack|") then.|
|00002510| 70 75 74 20 75 70 64 61 | 74 65 53 74 61 63 6b 28 |put upda|teStack(|
|00002520| 29 20 69 6e 74 6f 20 6e | 75 6c 6c 0d 65 6c 73 65 |) into n|ull.else|
|00002530| 20 69 66 20 28 77 6f 72 | 64 20 31 20 6f 66 20 74 | if (wor|d 1 of t|
|00002540| 68 65 41 63 74 69 6f 6e | 20 69 73 20 22 54 65 78 |heAction| is "Tex|
|00002550| 74 22 29 20 74 68 65 6e | 0d 64 65 6c 65 74 65 20 |t") then|.delete |
|00002560| 77 6f 72 64 20 31 20 6f | 66 20 74 68 65 41 63 74 |word 1 o|f theAct|
|00002570| 69 6f 6e 0d 73 65 6c 65 | 63 74 20 67 6c 6f 62 61 |ion.sele|ct globa|
|00002580| 6c 43 68 75 6e 6b 0d 69 | 66 20 28 28 67 6c 6f 62 |lChunk.i|f ((glob|
|00002590| 61 6c 43 68 75 6e 6b 20 | 69 73 20 22 22 29 20 6f |alChunk |is "") o|
|000025a0| 72 20 28 77 6f 72 64 20 | 32 20 6f 66 20 67 6c 6f |r (word |2 of glo|
|000025b0| 62 61 6c 43 68 75 6e 6b | 20 3e 20 77 6f 72 64 20 |balChunk| > word |
|000025c0| 34 20 6f 66 20 67 6c 6f | 62 61 6c 43 68 75 6e 6b |4 of glo|balChunk|
|000025d0| 29 29 20 74 68 65 6e 0d | 61 6e 73 77 65 72 20 22 |)) then.|answer "|
|000025e0| 53 65 6c 65 63 74 65 64 | 20 74 65 78 74 20 69 73 |Selected| text is|
|000025f0| 20 65 6d 70 74 79 2e 22 | 0d 65 6c 73 65 0d 69 66 | empty."|.else.if|
|00002600| 20 20 20 20 20 20 28 74 | 68 65 41 63 74 69 6f 6e | (t|heAction|
|00002610| 20 69 73 20 22 3e 20 41 | 64 64 22 29 20 74 68 65 | is "> A|dd") the|
|00002620| 6e 0d 70 75 74 20 74 65 | 78 74 53 68 69 66 74 28 |n.put te|xtShift(|
|00002630| 22 72 69 67 68 74 22 2c | 22 3e 22 2c 67 6c 6f 62 |"right",|">",glob|
|00002640| 61 6c 54 65 78 74 29 20 | 20 69 6e 74 6f 20 74 68 |alText) | into th|
|00002650| 65 20 73 65 6c 65 63 74 | 65 64 43 68 75 6e 6b 0d |e select|edChunk.|
|00002660| 65 6c 73 65 20 69 66 20 | 28 74 68 65 41 63 74 69 |else if |(theActi|
|00002670| 6f 6e 20 69 73 20 22 3e | 20 52 65 6d 6f 76 65 22 |on is ">| Remove"|
|00002680| 29 20 74 68 65 6e 0d 70 | 75 74 20 74 65 78 74 53 |) then.p|ut textS|
|00002690| 68 69 66 74 28 22 6c 65 | 66 74 22 2c 22 3e 22 2c |hift("le|ft",">",|
|000026a0| 67 6c 6f 62 61 6c 54 65 | 78 74 29 20 20 20 69 6e |globalTe|xt) in|
|000026b0| 74 6f 20 74 68 65 20 73 | 65 6c 65 63 74 65 64 43 |to the s|electedC|
|000026c0| 68 75 6e 6b 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |hunk.els|e if (th|
|000026d0| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 44 6f 20 49 |eAction |is "Do I|
|000026e0| 74 22 29 20 74 68 65 6e | 0d 73 65 6e 64 20 28 67 |t") then|.send (g|
|000026f0| 6c 6f 62 61 6c 54 65 78 | 74 29 20 74 6f 20 48 79 |lobalTex|t) to Hy|
|00002700| 70 65 72 43 61 72 64 0d | 65 6c 73 65 20 69 66 20 |perCard.|else if |
|00002710| 28 74 68 65 41 63 74 69 | 6f 6e 20 69 73 20 22 53 |(theActi|on is "S|
|00002720| 68 69 66 74 20 4c 65 66 | 74 22 29 20 74 68 65 6e |hift Lef|t") then|
|00002730| 0d 70 75 74 20 74 65 78 | 74 53 68 69 66 74 28 22 |.put tex|tShift("|
|00002740| 6c 65 66 74 22 2c 22 20 | 20 22 2c 67 6c 6f 62 61 |left"," | ",globa|
|00002750| 6c 54 65 78 74 29 20 20 | 69 6e 74 6f 20 74 68 65 |lText) |into the|
|00002760| 20 73 65 6c 65 63 74 65 | 64 43 68 75 6e 6b 0d 65 | selecte|dChunk.e|
|00002770| 6c 73 65 20 69 66 20 28 | 74 68 65 41 63 74 69 6f |lse if (|theActio|
|00002780| 6e 20 69 73 20 22 53 68 | 69 66 74 20 52 69 67 68 |n is "Sh|ift Righ|
|00002790| 74 22 29 20 74 68 65 6e | 0d 70 75 74 20 74 65 78 |t") then|.put tex|
|000027a0| 74 53 68 69 66 74 28 22 | 72 69 67 68 74 22 2c 22 |tShift("|right","|
|000027b0| 20 20 22 2c 67 6c 6f 62 | 61 6c 54 65 78 74 29 20 | ",glob|alText) |
|000027c0| 69 6e 74 6f 20 74 68 65 | 20 73 65 6c 65 63 74 65 |into the| selecte|
|000027d0| 64 43 68 75 6e 6b 0d 65 | 6c 73 65 20 69 66 20 28 |dChunk.e|lse if (|
|000027e0| 74 68 65 41 63 74 69 6f | 6e 20 69 73 20 22 53 6f |theActio|n is "So|
|000027f0| 72 74 20 41 73 63 65 6e | 64 69 6e 67 22 29 20 74 |rt Ascen|ding") t|
|00002800| 68 65 6e 0d 70 75 74 20 | 74 65 78 74 53 6f 72 74 |hen.put |textSort|
|00002810| 28 22 41 73 63 65 6e 64 | 69 6e 67 22 2c 67 6c 6f |("Ascend|ing",glo|
|00002820| 62 61 6c 54 65 78 74 29 | 20 20 20 69 6e 74 6f 20 |balText)| into |
|00002830| 74 68 65 20 73 65 6c 65 | 63 74 65 64 43 68 75 6e |the sele|ctedChun|
|00002840| 6b 0d 73 65 74 20 74 68 | 65 20 73 63 72 6f 6c 6c |k.set th|e scroll|
|00002850| 20 6f 66 20 67 6c 6f 62 | 61 6c 46 6c 64 20 74 6f | of glob|alFld to|
|00002860| 20 30 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 | 0.else |if (theA|
|00002870| 63 74 69 6f 6e 20 69 73 | 20 22 53 6f 72 74 20 44 |ction is| "Sort D|
|00002880| 65 73 63 65 6e 64 69 6e | 67 22 29 20 74 68 65 6e |escendin|g") then|
|00002890| 0d 70 75 74 20 74 65 78 | 74 53 6f 72 74 28 22 44 |.put tex|tSort("D|
|000028a0| 65 73 63 65 6e 64 69 6e | 67 22 2c 67 6c 6f 62 61 |escendin|g",globa|
|000028b0| 6c 54 65 78 74 29 20 20 | 69 6e 74 6f 20 74 68 65 |lText) |into the|
|000028c0| 20 73 65 6c 65 63 74 65 | 64 43 68 75 6e 6b 0d 73 | selecte|dChunk.s|
|000028d0| 65 74 20 74 68 65 20 73 | 63 72 6f 6c 6c 20 6f 66 |et the s|croll of|
|000028e0| 20 67 6c 6f 62 61 6c 46 | 6c 64 20 74 6f 20 30 0d | globalF|ld to 0.|
|000028f0| 65 6c 73 65 20 69 66 20 | 28 74 68 65 41 63 74 69 |else if |(theActi|
|00002900| 6f 6e 20 69 73 20 22 54 | 6f 44 6f 20 44 6f 6e 65 |on is "T|oDo Done|
|00002910| 22 29 20 74 68 65 6e 0d | 70 75 74 20 74 65 78 74 |") then.|put text|
|00002920| 54 6f 44 6f 44 6f 6e 65 | 28 67 6c 6f 62 61 6c 46 |ToDoDone|(globalF|
|00002930| 6c 64 2c 67 6c 6f 62 61 | 6c 54 65 78 74 29 20 69 |ld,globa|lText) i|
|00002940| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6e 64 20 69 66 0d |nto null|.end if.|
|00002950| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 75 6e |end if.e|nd if.un|
|00002960| 6c 6f 63 6b 20 6d 65 73 | 73 61 67 65 73 0d 75 6e |lock mes|sages.un|
|00002970| 6c 6f 63 6b 20 73 63 72 | 65 65 6e 0d 62 65 65 70 |lock scr|een.beep|
|00002980| 20 31 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 00 00 | 1.end m|ouseUp..|
|00002990| 00 30 00 02 02 bd 00 10 | 00 00 00 20 02 00 80 02 |.0......|... ....|
|000029a0| 00 00 00 00 00 00 00 16 | 00 0a 00 00 00 0d 46 6c |........|......Fl|
|000029b0| 69 70 00 00 0d 0d 0d 0d | 0d 0d 0d 0d 0d 0d 00 00 |ip......|........|
|000029c0| 00 26 00 03 02 04 00 10 | 00 00 01 f0 02 00 00 07 |.&......|........|
|000029d0| 00 00 00 00 00 00 00 16 | 00 0a 00 00 00 0d 54 65 |........|......Te|
|000029e0| 78 74 00 00 00 00 00 26 | 00 04 02 04 00 00 00 00 |xt.....&|........|
|000029f0| 00 10 02 00 00 02 00 00 | 00 00 00 00 00 16 00 0a |........|........|
|00002a00| 01 00 00 0d 54 69 74 6c | 65 00 00 00 00 01 00 78 |....Titl|e......x|
|00002a10| 00 43 72 65 61 74 65 20 | 4e 65 77 20 4c 69 73 74 |.Create |New List|
|00002a20| 0d 46 6c 69 70 20 41 73 | 63 65 6e 64 69 6e 67 2f |.Flip As|cending/|
|00002a30| 44 65 73 63 65 6e 64 69 | 6e 67 0d 49 6e 64 65 78 |Descendi|ng.Index|
|00002a40| 20 46 69 6c 74 65 72 20 | 49 6e 0d 49 6e 64 65 78 | Filter |In.Index|
|00002a50| 20 46 69 6c 74 65 72 20 | 4f 75 74 0d 52 65 6d 6f | Filter |Out.Remo|
|00002a60| 76 65 20 53 70 61 63 65 | 20 28 2a 41 6c 6c 2a 29 |ve Space| (*All*)|
|00002a70| 0d 53 6f 72 74 20 43 61 | 72 64 73 0d 55 70 64 61 |.Sort Ca|rds.Upda|
|00002a80| 74 65 20 49 6e 64 65 78 | 00 02 00 0a 00 41 73 63 |te Index|.....Asc|
|00002a90| 65 6e 64 69 6e 67 31 00 | 00 00 00 00 00 00 00 00 |ending1.|........|
|00002aa0| 00 00 15 a0 42 4b 47 44 | 00 00 0e 02 00 00 00 00 |....BKGD|........|
|00002ab0| 00 00 00 00 40 00 00 00 | 00 00 00 03 00 00 0a 59 |....@...|.......Y|
|00002ac0| 00 00 0a 59 00 03 00 03 | 00 00 12 8c 00 01 00 00 |...Y....|........|
|00002ad0| 00 88 10 de 00 01 01 00 | 01 f0 00 00 02 00 02 00 |........|........|
|00002ae0| a0 0b 00 78 00 06 00 00 | 00 16 00 0a 01 00 00 0d |...x....|........|
|00002af0| 2a 20 41 63 74 69 6f 6e | 00 00 6f 6e 20 6d 6f 75 |* Action|..on mou|
|00002b00| 73 65 55 70 0d 67 6c 6f | 62 61 6c 20 67 6c 6f 62 |seUp.glo|bal glob|
|00002b10| 61 6c 43 68 75 6e 6b 2c | 67 6c 6f 62 61 6c 46 6c |alChunk,|globalFl|
|00002b20| 64 2c 67 6c 6f 62 61 6c | 54 65 78 74 0d 6c 6f 63 |d,global|Text.loc|
|00002b30| 6b 20 6d 65 73 73 61 67 | 65 73 0d 6c 6f 63 6b 20 |k messag|es.lock |
|00002b40| 73 63 72 65 65 6e 0d 73 | 65 74 20 74 68 65 20 63 |screen.s|et the c|
|00002b50| 75 72 73 6f 72 20 74 6f | 20 62 75 73 79 0d 70 75 |ursor to| busy.pu|
|00002b60| 74 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 54 65 |t the se|lectedTe|
|00002b70| 78 74 20 6f 66 20 74 68 | 65 20 74 61 72 67 65 74 |xt of th|e target|
|00002b80| 20 69 6e 74 6f 20 74 68 | 65 41 63 74 69 6f 6e 0d | into th|eAction.|
|00002b90| 69 66 20 20 20 20 20 20 | 28 22 24 2a 24 22 20 69 |if |("$*$" i|
|00002ba0| 73 20 69 6e 20 22 24 22 | 20 26 20 74 68 65 41 63 |s in "$"| & theAc|
|00002bb0| 74 69 6f 6e 20 26 20 22 | 24 22 29 20 74 68 65 6e |tion & "|$") then|
|00002bc0| 0d 61 6e 73 77 65 72 20 | 22 54 68 69 73 20 66 75 |.answer |"This fu|
|00002bd0| 6e 63 74 69 6f 6e 20 69 | 73 20 61 63 68 69 65 76 |nction i|s achiev|
|00002be0| 65 64 20 62 79 20 61 20 | 6b 65 79 20 63 6f 6d 62 |ed by a |key comb|
|00002bf0| 69 6e 61 74 69 6f 6e 2e | 22 0d 65 6c 73 65 20 69 |ination.|".else i|
|00002c00| 66 20 28 74 68 65 41 63 | 74 69 6f 6e 20 69 73 20 |f (theAc|tion is |
|00002c10| 22 43 72 65 61 74 65 20 | 4e 65 77 20 44 69 72 65 |"Create |New Dire|
|00002c20| 63 74 6f 72 79 22 29 20 | 74 68 65 6e 0d 67 6f 20 |ctory") |then.go |
|00002c30| 62 67 20 22 33 22 0d 73 | 65 6e 64 20 28 22 64 6f |bg "3".s|end ("do|
|00002c40| 4d 65 6e 75 20 22 20 26 | 20 71 75 6f 74 65 20 26 |Menu " &| quote &|
|00002c50| 20 22 4e 65 77 20 43 61 | 72 64 22 20 26 20 71 75 | "New Ca|rd" & qu|
|00002c60| 6f 74 65 20 26 20 22 2c | 22 20 26 20 71 75 6f 74 |ote & ",|" & quot|
|00002c70| 65 20 26 20 22 45 64 69 | 74 22 20 26 20 71 75 6f |e & "Edi|t" & quo|
|00002c80| 74 65 29 20 74 6f 20 48 | 79 70 65 72 43 61 72 64 |te) to H|yperCard|
|00002c90| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00002ca0| 69 6f 6e 20 69 73 20 22 | 43 72 65 61 74 65 20 4e |ion is "|Create N|
|00002cb0| 65 77 20 4c 69 73 74 22 | 29 20 74 68 65 6e 0d 67 |ew List"|) then.g|
|00002cc0| 6f 20 62 67 20 22 32 22 | 0d 73 65 6e 64 20 28 22 |o bg "2"|.send ("|
|00002cd0| 64 6f 4d 65 6e 75 20 22 | 20 26 20 71 75 6f 74 65 |doMenu "| & quote|
|00002ce0| 20 26 20 22 4e 65 77 20 | 43 61 72 64 22 20 26 20 | & "New |Card" & |
|00002cf0| 71 75 6f 74 65 20 26 20 | 22 2c 22 20 26 20 71 75 |quote & |"," & qu|
|00002d00| 6f 74 65 20 26 20 22 45 | 64 69 74 22 20 26 20 71 |ote & "E|dit" & q|
|00002d10| 75 6f 74 65 29 20 74 6f | 20 48 79 70 65 72 43 61 |uote) to| HyperCa|
|00002d20| 72 64 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |rd.else |if (theA|
|00002d30| 63 74 69 6f 6e 20 69 73 | 20 22 43 72 65 61 74 65 |ction is| "Create|
|00002d40| 20 4e 65 77 20 4d 61 69 | 6c 62 6f 78 22 29 20 74 | New Mai|lbox") t|
|00002d50| 68 65 6e 0d 70 75 74 20 | 63 72 65 61 74 65 4d 61 |hen.put |createMa|
|00002d60| 69 6c 62 6f 78 28 29 20 | 69 6e 74 6f 20 6e 75 6c |ilbox() |into nul|
|00002d70| 6c 0d 65 6c 73 65 20 69 | 66 20 28 74 68 65 41 63 |l.else i|f (theAc|
|00002d80| 74 69 6f 6e 20 69 73 20 | 22 43 72 65 61 74 65 20 |tion is |"Create |
|00002d90| 4e 65 77 20 4d 65 73 73 | 61 67 65 22 29 20 74 68 |New Mess|age") th|
|00002da0| 65 6e 0d 70 75 74 20 63 | 72 65 61 74 65 4d 65 73 |en.put c|reateMes|
|00002db0| 73 61 67 65 28 29 20 69 | 6e 74 6f 20 6e 75 6c 6c |sage() i|nto null|
|00002dc0| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00002dd0| 69 6f 6e 20 69 73 20 22 | 43 72 65 61 74 65 20 4e |ion is "|Create N|
|00002de0| 65 77 20 4f 62 6a 65 63 | 74 22 29 20 74 68 65 6e |ew Objec|t") then|
|00002df0| 0d 67 6f 20 62 67 20 22 | 32 22 0d 73 65 6e 64 20 |.go bg "|2".send |
|00002e00| 28 22 64 6f 4d 65 6e 75 | 20 22 20 26 20 71 75 6f |("doMenu| " & quo|
|00002e10| 74 65 20 26 20 22 4e 65 | 77 20 43 61 72 64 22 20 |te & "Ne|w Card" |
|00002e20| 26 20 71 75 6f 74 65 20 | 26 20 22 2c 22 20 26 20 |& quote |& "," & |
|00002e30| 71 75 6f 74 65 20 26 20 | 22 45 64 69 74 22 20 26 |quote & |"Edit" &|
|00002e40| 20 71 75 6f 74 65 29 20 | 74 6f 20 48 79 70 65 72 | quote) |to Hyper|
|00002e50| 43 61 72 64 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |Card.els|e if (th|
|00002e60| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 44 69 61 6c |eAction |is "Dial|
|00002e70| 20 54 65 6c 65 70 68 6f | 6e 65 20 4e 75 6d 62 65 | Telepho|ne Numbe|
|00002e80| 72 22 29 20 74 68 65 6e | 0d 70 75 74 20 64 69 61 |r") then|.put dia|
|00002e90| 6c 54 65 6c 65 70 68 6f | 6e 65 28 29 20 69 6e 74 |lTelepho|ne() int|
|00002ea0| 6f 20 6e 75 6c 6c 0d 65 | 6c 73 65 20 69 66 20 28 |o null.e|lse if (|
|00002eb0| 74 68 65 41 63 74 69 6f | 6e 20 69 73 20 22 46 69 |theActio|n is "Fi|
|00002ec0| 6c 65 20 69 6e 74 6f 20 | 4d 61 69 6c 62 6f 78 22 |le into |Mailbox"|
|00002ed0| 29 20 74 68 65 6e 0d 70 | 75 74 20 66 69 6c 65 4d |) then.p|ut fileM|
|00002ee0| 61 69 6c 62 6f 78 28 29 | 20 69 6e 74 6f 20 6e 75 |ailbox()| into nu|
|00002ef0| 6c 6c 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |ll.else |if (theA|
|00002f00| 63 74 69 6f 6e 20 69 73 | 20 22 46 6c 69 70 20 41 |ction is| "Flip A|
|00002f10| 73 63 65 6e 64 69 6e 67 | 2f 44 65 73 63 65 6e 64 |scending|/Descend|
|00002f20| 69 6e 67 22 29 20 74 68 | 65 6e 0d 70 75 74 20 66 |ing") th|en.put f|
|00002f30| 6c 69 70 54 68 65 6d 28 | 62 67 20 66 6c 64 20 22 |lipThem(|bg fld "|
|00002f40| 46 6c 69 70 22 29 20 69 | 6e 74 6f 20 6e 75 6c 6c |Flip") i|nto null|
|00002f50| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00002f60| 69 6f 6e 20 69 73 20 22 | 46 6c 69 70 20 45 6e 76 |ion is "|Flip Env|
|00002f70| 65 6c 6f 70 65 2f 43 6f | 6e 74 65 6e 74 22 29 20 |elope/Co|ntent") |
|00002f80| 74 68 65 6e 0d 70 75 74 | 20 66 6c 69 70 54 68 65 |then.put| flipThe|
|00002f90| 6d 28 62 67 20 66 6c 64 | 20 22 46 6c 69 70 22 29 |m(bg fld| "Flip")|
|00002fa0| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6c 73 65 20 | into nu|ll.else |
|00002fb0| 69 66 20 28 74 68 65 41 | 63 74 69 6f 6e 20 69 73 |if (theA|ction is|
|00002fc0| 20 22 46 6c 69 70 20 53 | 69 6e 67 6c 65 2f 44 6f | "Flip S|ingle/Do|
|00002fd0| 75 62 6c 65 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |uble") t|hen.put |
|00002fe0| 66 6c 69 70 54 68 65 6d | 28 62 67 20 66 6c 64 20 |flipThem|(bg fld |
|00002ff0| 22 46 6c 69 70 22 29 20 | 69 6e 74 6f 20 6e 75 6c |"Flip") |into nul|
|00003000| 6c 0d 65 6c 73 65 20 69 | 66 20 28 74 68 65 41 63 |l.else i|f (theAc|
|00003010| 74 69 6f 6e 20 69 73 20 | 22 46 6f 72 6d 61 74 20 |tion is |"Format |
|00003020| 4d 61 69 6c 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |Mail") t|hen.put |
|00003030| 66 6f 72 6d 61 74 4d 61 | 69 6c 28 29 20 69 6e 74 |formatMa|il() int|
|00003040| 6f 20 6e 75 6c 6c 0d 65 | 6c 73 65 20 69 66 20 28 |o null.e|lse if (|
|00003050| 74 68 65 41 63 74 69 6f | 6e 20 69 73 20 22 47 6f |theActio|n is "Go|
|00003060| 20 49 6e 64 65 78 22 29 | 20 74 68 65 6e 0d 73 65 | Index")| then.se|
|00003070| 6e 64 20 28 22 63 6c 6f | 73 65 43 61 72 64 22 29 |nd ("clo|seCard")|
|00003080| 20 74 6f 20 74 68 69 73 | 20 63 64 0d 67 6f 20 63 | to this| cd.go c|
|00003090| 64 20 22 28 49 6e 64 65 | 78 29 22 0d 73 65 6e 64 |d "(Inde|x)".send|
|000030a0| 20 28 22 6f 70 65 6e 43 | 61 72 64 22 29 20 20 74 | ("openC|ard") t|
|000030b0| 6f 20 74 68 69 73 20 63 | 64 0d 65 6c 73 65 20 69 |o this c|d.else i|
|000030c0| 66 20 28 74 68 65 41 63 | 74 69 6f 6e 20 69 73 20 |f (theAc|tion is |
|000030d0| 22 49 6e 64 65 78 20 46 | 69 6c 74 65 72 20 49 6e |"Index F|ilter In|
|000030e0| 22 29 20 74 68 65 6e 0d | 70 75 74 20 69 6e 64 65 |") then.|put inde|
|000030f0| 78 46 69 6c 74 65 72 28 | 22 69 6e 22 29 20 20 69 |xFilter(|"in") i|
|00003100| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6c 73 65 20 69 66 |nto null|.else if|
|00003110| 20 28 74 68 65 41 63 74 | 69 6f 6e 20 69 73 20 22 | (theAct|ion is "|
|00003120| 49 6e 64 65 78 20 46 69 | 6c 74 65 72 20 4f 75 74 |Index Fi|lter Out|
|00003130| 22 29 20 74 68 65 6e 0d | 70 75 74 20 69 6e 64 65 |") then.|put inde|
|00003140| 78 46 69 6c 74 65 72 28 | 22 6f 75 74 22 29 20 69 |xFilter(|"out") i|
|00003150| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6c 73 65 20 69 66 |nto null|.else if|
|00003160| 20 28 74 68 65 41 63 74 | 69 6f 6e 20 69 73 20 22 | (theAct|ion is "|
|00003170| 49 6e 73 74 61 6c 6c 20 | 48 61 6e 64 6c 65 72 22 |Install |Handler"|
|00003180| 29 20 74 68 65 6e 0d 70 | 75 74 20 69 6e 73 74 61 |) then.p|ut insta|
|00003190| 6c 6c 48 61 6e 64 6c 65 | 72 28 62 67 20 66 6c 64 |llHandle|r(bg fld|
|000031a0| 20 22 54 69 74 6c 65 22 | 29 20 69 6e 74 6f 20 6e | "Title"|) into n|
|000031b0| 75 6c 6c 0d 65 6c 73 65 | 20 69 66 20 28 74 68 65 |ull.else| if (the|
|000031c0| 41 63 74 69 6f 6e 20 69 | 73 20 22 4d 61 6b 65 20 |Action i|s "Make |
|000031d0| 4c 69 73 74 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |List") t|hen.put |
|000031e0| 6d 61 6b 65 4c 69 73 74 | 28 29 20 69 6e 74 6f 20 |makeList|() into |
|000031f0| 6e 75 6c 6c 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |null.els|e if (th|
|00003200| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 4d 61 6b 65 |eAction |is "Make|
|00003210| 20 4d 61 69 6c 22 29 20 | 74 68 65 6e 0d 70 75 74 | Mail") |then.put|
|00003220| 20 6d 61 6b 65 4d 61 69 | 6c 28 29 20 69 6e 74 6f | makeMai|l() into|
|00003230| 20 6e 75 6c 6c 0d 65 6c | 73 65 20 69 66 20 28 74 | null.el|se if (t|
|00003240| 68 65 41 63 74 69 6f 6e | 20 69 73 20 22 4d 61 6b |heAction| is "Mak|
|00003250| 65 20 50 72 6f 66 69 6c | 65 22 29 20 74 68 65 6e |e Profil|e") then|
|00003260| 0d 70 75 74 20 6d 61 6b | 65 50 72 6f 66 69 6c 65 |.put mak|eProfile|
|00003270| 28 29 20 69 6e 74 6f 20 | 6e 75 6c 6c 0d 65 6c 73 |() into |null.els|
|00003280| 65 20 69 66 20 28 74 68 | 65 41 63 74 69 6f 6e 20 |e if (th|eAction |
|00003290| 69 73 20 22 4d 61 6b 65 | 20 52 65 61 64 20 4f 6e |is "Make| Read On|
|000032a0| 6c 79 3a 44 69 72 65 63 | 74 6f 72 79 20 28 46 61 |ly:Direc|tory (Fa|
|000032b0| 6d 69 6c 79 29 22 29 20 | 74 68 65 6e 0d 70 75 74 |mily)") |then.put|
|000032c0| 20 6d 61 6b 65 44 69 72 | 65 63 74 6f 72 79 28 22 | makeDir|ectory("|
|000032d0| 46 61 6d 69 6c 79 22 29 | 20 69 6e 74 6f 20 6e 75 |Family")| into nu|
|000032e0| 6c 6c 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |ll.else |if (theA|
|000032f0| 63 74 69 6f 6e 20 69 73 | 20 22 4d 61 6b 65 20 52 |ction is| "Make R|
|00003300| 65 61 64 20 4f 6e 6c 79 | 3a 44 69 72 65 63 74 6f |ead Only|:Directo|
|00003310| 72 79 20 28 4d 65 6d 62 | 65 72 29 22 29 20 74 68 |ry (Memb|er)") th|
|00003320| 65 6e 0d 70 75 74 20 6d | 61 6b 65 44 69 72 65 63 |en.put m|akeDirec|
|00003330| 74 6f 72 79 28 22 4d 65 | 6d 62 65 72 22 29 20 69 |tory("Me|mber") i|
|00003340| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6c 73 65 20 69 66 |nto null|.else if|
|00003350| 20 28 74 68 65 41 63 74 | 69 6f 6e 20 69 73 20 22 | (theAct|ion is "|
|00003360| 4d 61 6b 65 20 52 65 61 | 64 20 4f 6e 6c 79 3a 45 |Make Rea|d Only:E|
|00003370| 6e 76 65 6c 6f 70 65 22 | 29 20 74 68 65 6e 0d 70 |nvelope"|) then.p|
|00003380| 75 74 20 6d 61 6b 65 45 | 6e 76 65 6c 6f 70 65 28 |ut makeE|nvelope(|
|00003390| 29 20 69 6e 74 6f 20 6e | 75 6c 6c 0d 65 6c 73 65 |) into n|ull.else|
|000033a0| 20 69 66 20 28 74 68 65 | 41 63 74 69 6f 6e 20 69 | if (the|Action i|
|000033b0| 73 20 22 4d 65 73 73 61 | 67 65 2d 50 61 73 73 69 |s "Messa|ge-Passi|
|000033c0| 6e 67 20 48 69 65 72 61 | 72 63 68 79 20 48 69 64 |ng Hiera|rchy Hid|
|000033d0| 65 22 29 20 74 68 65 6e | 0d 70 75 74 20 6d 65 73 |e") then|.put mes|
|000033e0| 73 61 67 65 48 69 65 72 | 61 72 63 68 79 28 22 68 |sageHier|archy("h|
|000033f0| 69 64 65 22 29 20 69 6e | 74 6f 20 6e 75 6c 6c 0d |ide") in|to null.|
|00003400| 65 6c 73 65 20 69 66 20 | 28 74 68 65 41 63 74 69 |else if |(theActi|
|00003410| 6f 6e 20 69 73 20 22 4d | 65 73 73 61 67 65 2d 50 |on is "M|essage-P|
|00003420| 61 73 73 69 6e 67 20 48 | 69 65 72 61 72 63 68 79 |assing H|ierarchy|
|00003430| 20 53 68 6f 77 22 29 20 | 74 68 65 6e 0d 70 75 74 | Show") |then.put|
|00003440| 20 6d 65 73 73 61 67 65 | 48 69 65 72 61 72 63 68 | message|Hierarch|
|00003450| 79 28 22 73 68 6f 77 22 | 29 20 69 6e 74 6f 20 6e |y("show"|) into n|
|00003460| 75 6c 6c 0d 65 6c 73 65 | 20 69 66 20 28 74 68 65 |ull.else| if (the|
|00003470| 41 63 74 69 6f 6e 20 69 | 73 20 22 52 65 6d 6f 76 |Action i|s "Remov|
|00003480| 65 20 53 70 61 63 65 22 | 29 20 74 68 65 6e 0d 70 |e Space"|) then.p|
|00003490| 75 74 20 72 65 6d 6f 76 | 65 53 70 61 63 65 28 29 |ut remov|eSpace()|
|000034a0| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6c 73 65 20 | into nu|ll.else |
|000034b0| 69 66 20 28 74 68 65 41 | 63 74 69 6f 6e 20 69 73 |if (theA|ction is|
|000034c0| 20 22 52 65 6d 6f 76 65 | 20 53 70 61 63 65 20 28 | "Remove| Space (|
|000034d0| 2a 41 6c 6c 2a 29 22 29 | 20 74 68 65 6e 0d 70 75 |*All*)")| then.pu|
|000034e0| 73 68 20 63 64 0d 72 65 | 70 65 61 74 20 77 69 74 |sh cd.re|peat wit|
|000034f0| 68 20 69 20 3d 20 28 74 | 68 65 20 6e 75 6d 62 65 |h i = (t|he numbe|
|00003500| 72 20 6f 66 20 74 68 69 | 73 20 63 64 20 2b 20 31 |r of thi|s cd + 1|
|00003510| 29 20 74 6f 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |) to the| number |
|00003520| 6f 66 20 63 64 73 0d 67 | 6f 20 63 64 20 69 0d 70 |of cds.g|o cd i.p|
|00003530| 75 74 20 72 65 6d 6f 76 | 65 53 70 61 63 65 28 29 |ut remov|eSpace()|
|00003540| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6e 64 20 72 | into nu|ll.end r|
|00003550| 65 70 65 61 74 0d 70 6f | 70 20 63 64 0d 65 6c 73 |epeat.po|p cd.els|
|00003560| 65 20 69 66 20 28 74 68 | 65 41 63 74 69 6f 6e 20 |e if (th|eAction |
|00003570| 69 73 20 22 53 68 6f 77 | 20 43 72 65 64 69 74 22 |is "Show| Credit"|
|00003580| 29 20 74 68 65 6e 0d 70 | 75 74 20 73 68 6f 77 43 |) then.p|ut showC|
|00003590| 72 65 64 69 74 28 29 20 | 69 6e 74 6f 20 6e 75 6c |redit() |into nul|
|000035a0| 6c 0d 65 6c 73 65 20 69 | 66 20 28 74 68 65 41 63 |l.else i|f (theAc|
|000035b0| 74 69 6f 6e 20 69 73 20 | 22 53 6f 72 74 20 43 61 |tion is |"Sort Ca|
|000035c0| 72 64 73 22 29 20 74 68 | 65 6e 0d 73 6f 72 74 20 |rds") th|en.sort |
|000035d0| 63 64 73 20 6f 66 20 74 | 68 69 73 20 73 74 61 63 |cds of t|his stac|
|000035e0| 6b 20 61 73 63 65 6e 64 | 69 6e 67 20 69 6e 74 65 |k ascend|ing inte|
|000035f0| 72 6e 61 74 69 6f 6e 61 | 6c 20 62 79 20 74 68 65 |rnationa|l by the|
|00003600| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|00003610| 68 69 73 20 63 64 0d 70 | 75 74 20 22 22 20 69 6e |his cd.p|ut "" in|
|00003620| 74 6f 20 62 67 20 66 6c | 64 20 22 54 65 78 74 22 |to bg fl|d "Text"|
|00003630| 0d 65 6c 73 65 20 69 66 | 20 28 74 68 65 41 63 74 |.else if| (theAct|
|00003640| 69 6f 6e 20 69 73 20 22 | 54 6f 64 61 79 27 73 20 |ion is "|Today's |
|00003650| 44 61 74 65 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |Date") t|hen.put |
|00003660| 74 6f 64 61 79 73 44 61 | 74 65 28 29 20 26 20 22 |todaysDa|te() & "|
|00003670| 20 7c 20 22 20 69 6e 74 | 6f 20 62 67 20 66 6c 64 | | " int|o bg fld|
|00003680| 20 22 54 69 74 6c 65 22 | 0d 70 75 74 20 73 65 74 | "Title"|.put set|
|00003690| 75 70 43 61 72 64 28 29 | 20 69 6e 74 6f 20 6e 75 |upCard()| into nu|
|000036a0| 6c 6c 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 |ll.else |if (theA|
|000036b0| 63 74 69 6f 6e 20 69 73 | 20 22 55 70 64 61 74 65 |ction is| "Update|
|000036c0| 20 49 6e 64 65 78 22 29 | 20 74 68 65 6e 0d 70 75 | Index")| then.pu|
|000036d0| 74 20 22 22 20 69 6e 74 | 6f 20 62 67 20 66 6c 64 |t "" int|o bg fld|
|000036e0| 20 22 54 65 78 74 22 0d | 73 65 6e 64 20 28 22 6f | "Text".|send ("o|
|000036f0| 70 65 6e 43 61 72 64 22 | 29 20 74 6f 20 74 68 69 |penCard"|) to thi|
|00003700| 73 20 63 64 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |s cd.els|e if (th|
|00003710| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 55 70 64 61 |eAction |is "Upda|
|00003720| 74 65 20 53 74 61 63 6b | 22 29 20 74 68 65 6e 0d |te Stack|") then.|
|00003730| 70 75 74 20 75 70 64 61 | 74 65 53 74 61 63 6b 28 |put upda|teStack(|
|00003740| 29 20 69 6e 74 6f 20 6e | 75 6c 6c 0d 65 6c 73 65 |) into n|ull.else|
|00003750| 20 69 66 20 28 77 6f 72 | 64 20 31 20 6f 66 20 74 | if (wor|d 1 of t|
|00003760| 68 65 41 63 74 69 6f 6e | 20 69 73 20 22 54 65 78 |heAction| is "Tex|
|00003770| 74 22 29 20 74 68 65 6e | 0d 64 65 6c 65 74 65 20 |t") then|.delete |
|00003780| 77 6f 72 64 20 31 20 6f | 66 20 74 68 65 41 63 74 |word 1 o|f theAct|
|00003790| 69 6f 6e 0d 73 65 6c 65 | 63 74 20 67 6c 6f 62 61 |ion.sele|ct globa|
|000037a0| 6c 43 68 75 6e 6b 0d 69 | 66 20 28 28 67 6c 6f 62 |lChunk.i|f ((glob|
|000037b0| 61 6c 43 68 75 6e 6b 20 | 69 73 20 22 22 29 20 6f |alChunk |is "") o|
|000037c0| 72 20 28 77 6f 72 64 20 | 32 20 6f 66 20 67 6c 6f |r (word |2 of glo|
|000037d0| 62 61 6c 43 68 75 6e 6b | 20 3e 20 77 6f 72 64 20 |balChunk| > word |
|000037e0| 34 20 6f 66 20 67 6c 6f | 62 61 6c 43 68 75 6e 6b |4 of glo|balChunk|
|000037f0| 29 29 20 74 68 65 6e 0d | 61 6e 73 77 65 72 20 22 |)) then.|answer "|
|00003800| 53 65 6c 65 63 74 65 64 | 20 74 65 78 74 20 69 73 |Selected| text is|
|00003810| 20 65 6d 70 74 79 2e 22 | 0d 65 6c 73 65 0d 69 66 | empty."|.else.if|
|00003820| 20 20 20 20 20 20 28 74 | 68 65 41 63 74 69 6f 6e | (t|heAction|
|00003830| 20 69 73 20 22 3e 20 41 | 64 64 22 29 20 74 68 65 | is "> A|dd") the|
|00003840| 6e 0d 70 75 74 20 74 65 | 78 74 53 68 69 66 74 28 |n.put te|xtShift(|
|00003850| 22 72 69 67 68 74 22 2c | 22 3e 22 2c 67 6c 6f 62 |"right",|">",glob|
|00003860| 61 6c 54 65 78 74 29 20 | 20 69 6e 74 6f 20 74 68 |alText) | into th|
|00003870| 65 20 73 65 6c 65 63 74 | 65 64 43 68 75 6e 6b 0d |e select|edChunk.|
|00003880| 65 6c 73 65 20 69 66 20 | 28 74 68 65 41 63 74 69 |else if |(theActi|
|00003890| 6f 6e 20 69 73 20 22 3e | 20 52 65 6d 6f 76 65 22 |on is ">| Remove"|
|000038a0| 29 20 74 68 65 6e 0d 70 | 75 74 20 74 65 78 74 53 |) then.p|ut textS|
|000038b0| 68 69 66 74 28 22 6c 65 | 66 74 22 2c 22 3e 22 2c |hift("le|ft",">",|
|000038c0| 67 6c 6f 62 61 6c 54 65 | 78 74 29 20 20 20 69 6e |globalTe|xt) in|
|000038d0| 74 6f 20 74 68 65 20 73 | 65 6c 65 63 74 65 64 43 |to the s|electedC|
|000038e0| 68 75 6e 6b 0d 65 6c 73 | 65 20 69 66 20 28 74 68 |hunk.els|e if (th|
|000038f0| 65 41 63 74 69 6f 6e 20 | 69 73 20 22 44 6f 20 49 |eAction |is "Do I|
|00003900| 74 22 29 20 74 68 65 6e | 0d 73 65 6e 64 20 28 67 |t") then|.send (g|
|00003910| 6c 6f 62 61 6c 54 65 78 | 74 29 20 74 6f 20 48 79 |lobalTex|t) to Hy|
|00003920| 70 65 72 43 61 72 64 0d | 65 6c 73 65 20 69 66 20 |perCard.|else if |
|00003930| 28 74 68 65 41 63 74 69 | 6f 6e 20 69 73 20 22 53 |(theActi|on is "S|
|00003940| 68 69 66 74 20 4c 65 66 | 74 22 29 20 74 68 65 6e |hift Lef|t") then|
|00003950| 0d 70 75 74 20 74 65 78 | 74 53 68 69 66 74 28 22 |.put tex|tShift("|
|00003960| 6c 65 66 74 22 2c 22 20 | 20 22 2c 67 6c 6f 62 61 |left"," | ",globa|
|00003970| 6c 54 65 78 74 29 20 20 | 69 6e 74 6f 20 74 68 65 |lText) |into the|
|00003980| 20 73 65 6c 65 63 74 65 | 64 43 68 75 6e 6b 0d 65 | selecte|dChunk.e|
|00003990| 6c 73 65 20 69 66 20 28 | 74 68 65 41 63 74 69 6f |lse if (|theActio|
|000039a0| 6e 20 69 73 20 22 53 68 | 69 66 74 20 52 69 67 68 |n is "Sh|ift Righ|
|000039b0| 74 22 29 20 74 68 65 6e | 0d 70 75 74 20 74 65 78 |t") then|.put tex|
|000039c0| 74 53 68 69 66 74 28 22 | 72 69 67 68 74 22 2c 22 |tShift("|right","|
|000039d0| 20 20 22 2c 67 6c 6f 62 | 61 6c 54 65 78 74 29 20 | ",glob|alText) |
|000039e0| 69 6e 74 6f 20 74 68 65 | 20 73 65 6c 65 63 74 65 |into the| selecte|
|000039f0| 64 43 68 75 6e 6b 0d 65 | 6c 73 65 20 69 66 20 28 |dChunk.e|lse if (|
|00003a00| 74 68 65 41 63 74 69 6f | 6e 20 69 73 20 22 53 6f |theActio|n is "So|
|00003a10| 72 74 20 41 73 63 65 6e | 64 69 6e 67 22 29 20 74 |rt Ascen|ding") t|
|00003a20| 68 65 6e 0d 70 75 74 20 | 74 65 78 74 53 6f 72 74 |hen.put |textSort|
|00003a30| 28 22 41 73 63 65 6e 64 | 69 6e 67 22 2c 67 6c 6f |("Ascend|ing",glo|
|00003a40| 62 61 6c 54 65 78 74 29 | 20 20 20 69 6e 74 6f 20 |balText)| into |
|00003a50| 74 68 65 20 73 65 6c 65 | 63 74 65 64 43 68 75 6e |the sele|ctedChun|
|00003a60| 6b 0d 73 65 74 20 74 68 | 65 20 73 63 72 6f 6c 6c |k.set th|e scroll|
|00003a70| 20 6f 66 20 67 6c 6f 62 | 61 6c 46 6c 64 20 74 6f | of glob|alFld to|
|00003a80| 20 30 0d 65 6c 73 65 20 | 69 66 20 28 74 68 65 41 | 0.else |if (theA|
|00003a90| 63 74 69 6f 6e 20 69 73 | 20 22 53 6f 72 74 20 44 |ction is| "Sort D|
|00003aa0| 65 73 63 65 6e 64 69 6e | 67 22 29 20 74 68 65 6e |escendin|g") then|
|00003ab0| 0d 70 75 74 20 74 65 78 | 74 53 6f 72 74 28 22 44 |.put tex|tSort("D|
|00003ac0| 65 73 63 65 6e 64 69 6e | 67 22 2c 67 6c 6f 62 61 |escendin|g",globa|
|00003ad0| 6c 54 65 78 74 29 20 20 | 69 6e 74 6f 20 74 68 65 |lText) |into the|
|00003ae0| 20 73 65 6c 65 63 74 65 | 64 43 68 75 6e 6b 0d 73 | selecte|dChunk.s|
|00003af0| 65 74 20 74 68 65 20 73 | 63 72 6f 6c 6c 20 6f 66 |et the s|croll of|
|00003b00| 20 67 6c 6f 62 61 6c 46 | 6c 64 20 74 6f 20 30 0d | globalF|ld to 0.|
|00003b10| 65 6c 73 65 20 69 66 20 | 28 74 68 65 41 63 74 69 |else if |(theActi|
|00003b20| 6f 6e 20 69 73 20 22 54 | 6f 44 6f 20 44 6f 6e 65 |on is "T|oDo Done|
|00003b30| 22 29 20 74 68 65 6e 0d | 70 75 74 20 74 65 78 74 |") then.|put text|
|00003b40| 54 6f 44 6f 44 6f 6e 65 | 28 67 6c 6f 62 61 6c 46 |ToDoDone|(globalF|
|00003b50| 6c 64 2c 67 6c 6f 62 61 | 6c 54 65 78 74 29 20 69 |ld,globa|lText) i|
|00003b60| 6e 74 6f 20 6e 75 6c 6c | 0d 65 6e 64 20 69 66 0d |nto null|.end if.|
|00003b70| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 75 6e |end if.e|nd if.un|
|00003b80| 6c 6f 63 6b 20 6d 65 73 | 73 61 67 65 73 0d 75 6e |lock mes|sages.un|
|00003b90| 6c 6f 63 6b 20 73 63 72 | 65 65 6e 0d 62 65 65 70 |lock scr|een.beep|
|00003ba0| 20 31 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 00 00 | 1.end m|ouseUp..|
|00003bb0| 00 26 00 02 02 04 00 10 | 00 00 01 f0 02 00 00 07 |.&......|........|
|00003bc0| 00 00 00 00 00 00 00 16 | 00 0a 00 00 00 0d 54 65 |........|......Te|
|00003bd0| 78 74 00 00 00 00 01 88 | 00 03 02 04 00 00 00 00 |xt......|........|
|00003be0| 00 10 02 00 00 02 00 00 | 00 00 00 00 00 16 00 0a |........|........|
|00003bf0| 01 00 00 0d 54 69 74 6c | 65 00 00 6f 6e 20 63 6c |....Titl|e..on cl|
|00003c00| 6f 73 65 46 69 65 6c 64 | 0d 70 75 74 20 73 65 74 |oseField|.put set|
|00003c10| 75 70 43 61 72 64 28 29 | 20 69 6e 74 6f 20 6e 75 |upCard()| into nu|
|00003c20| 6c 6c 0d 70 61 73 73 20 | 63 6c 6f 73 65 46 69 65 |ll.pass |closeFie|
|00003c30| 6c 64 0d 65 6e 64 20 63 | 6c 6f 73 65 46 69 65 6c |ld.end c|loseFiel|
|00003c40| 64 0d 0d 6f 6e 20 63 6f | 6d 6d 61 6e 64 4b 65 79 |d..on co|mmandKey|
|00003c50| 44 6f 77 6e 20 74 68 65 | 4b 65 79 0d 69 66 20 28 |Down the|Key.if (|
|00003c60| 74 68 65 4b 65 79 20 69 | 73 20 22 56 22 29 20 74 |theKey i|s "V") t|
|00003c70| 68 65 6e 0d 73 65 6e 64 | 20 28 22 64 6f 4d 65 6e |hen.send| ("doMen|
|00003c80| 75 20 22 20 26 20 71 75 | 6f 74 65 20 26 20 22 50 |u " & qu|ote & "P|
|00003c90| 61 73 74 65 20 54 65 78 | 74 22 20 26 20 71 75 6f |aste Tex|t" & quo|
|00003ca0| 74 65 20 26 20 22 2c 22 | 20 26 20 71 75 6f 74 65 |te & ","| & quote|
|00003cb0| 20 26 20 22 45 64 69 74 | 22 20 26 20 71 75 6f 74 | & "Edit|" & quot|
|00003cc0| 65 29 20 74 6f 20 48 79 | 70 65 72 43 61 72 64 0d |e) to Hy|perCard.|
|00003cd0| 70 75 74 20 73 65 74 75 | 70 43 61 72 64 28 29 20 |put setu|pCard() |
|00003ce0| 69 6e 74 6f 20 6e 75 6c | 6c 0d 65 6e 64 20 69 66 |into nul|l.end if|
|00003cf0| 0d 70 61 73 73 20 63 6f | 6d 6d 61 6e 64 4b 65 79 |.pass co|mmandKey|
|00003d00| 44 6f 77 6e 0d 65 6e 64 | 20 63 6f 6d 6d 61 6e 64 |Down.end| command|
|00003d10| 4b 65 79 44 6f 77 6e 0d | 0d 6f 6e 20 65 78 69 74 |KeyDown.|.on exit|
|00003d20| 46 69 65 6c 64 0d 70 75 | 74 20 73 65 74 75 70 43 |Field.pu|t setupC|
|00003d30| 61 72 64 28 29 20 69 6e | 74 6f 20 6e 75 6c 6c 0d |ard() in|to null.|
|00003d40| 70 61 73 73 20 65 78 69 | 74 46 69 65 6c 64 0d 65 |pass exi|tField.e|
|00003d50| 6e 64 20 65 78 69 74 46 | 69 65 6c 64 00 00 00 01 |nd exitF|ield....|
|00003d60| 00 84 00 47 6f 20 49 6e | 64 65 78 0d 4d 61 6b 65 |...Go In|dex.Make|
|00003d70| 20 4c 69 73 74 0d 52 65 | 6d 6f 76 65 20 53 70 61 | List.Re|move Spa|
|00003d80| 63 65 0d 54 65 78 74 20 | 44 6f 20 49 74 0d 54 65 |ce.Text |Do It.Te|
|00003d90| 78 74 20 53 68 69 66 74 | 20 4c 65 66 74 0d 54 65 |xt Shift| Left.Te|
|00003da0| 78 74 20 53 68 69 66 74 | 20 52 69 67 68 74 0d 54 |xt Shift| Right.T|
|00003db0| 65 78 74 20 53 6f 72 74 | 20 41 73 63 65 6e 64 69 |ext Sort| Ascendi|
|00003dc0| 6e 67 0d 54 65 78 74 20 | 53 6f 72 74 20 44 65 73 |ng.Text |Sort Des|
|00003dd0| 63 65 6e 64 69 6e 67 0d | 54 65 78 74 20 54 6f 44 |cending.|Text ToD|
|00003de0| 6f 20 44 6f 6e 65 32 00 | 6f 6e 20 6d 6f 75 73 65 |o Done2.|on mouse|
|00003df0| 57 69 74 68 69 6e 0d 67 | 6c 6f 62 61 6c 20 67 6c |Within.g|lobal gl|
|00003e00| 6f 62 61 6c 43 68 75 6e | 6b 2c 67 6c 6f 62 61 6c |obalChun|k,global|
|00003e10| 46 6c 64 2c 67 6c 6f 62 | 61 6c 54 65 78 74 0d 70 |Fld,glob|alText.p|
|00003e20| 75 74 20 74 68 65 20 73 | 65 6c 65 63 74 65 64 43 |ut the s|electedC|
|00003e30| 68 75 6e 6b 20 69 6e 74 | 6f 20 67 6c 6f 62 61 6c |hunk int|o global|
|00003e40| 43 68 75 6e 6b 0d 70 75 | 74 20 74 68 65 20 73 65 |Chunk.pu|t the se|
|00003e50| 6c 65 63 74 65 64 46 69 | 65 6c 64 20 69 6e 74 6f |lectedFi|eld into|
|00003e60| 20 67 6c 6f 62 61 6c 46 | 6c 64 0d 70 75 74 20 74 | globalF|ld.put t|
|00003e70| 68 65 20 73 65 6c 65 63 | 74 65 64 54 65 78 74 20 |he selec|tedText |
|00003e80| 20 69 6e 74 6f 20 67 6c | 6f 62 61 6c 54 65 78 74 | into gl|obalText|
|00003e90| 0d 69 66 20 28 28 74 68 | 65 72 65 20 69 73 20 61 |.if ((th|ere is a|
|00003ea0| 20 62 67 20 66 6c 64 20 | 22 54 79 70 65 22 29 20 | bg fld |"Type") |
|00003eb0| 61 6e 64 20 28 74 68 65 | 72 65 20 69 73 20 61 20 |and (the|re is a |
|00003ec0| 62 67 20 66 6c 64 20 22 | 56 61 6c 75 65 22 29 29 |bg fld "|Value"))|
|00003ed0| 20 74 68 65 6e 0d 70 75 | 74 20 22 62 67 20 66 6c | then.pu|t "bg fl|
|00003ee0| 64 20 22 20 26 20 71 75 | 6f 74 65 20 26 20 22 54 |d " & qu|ote & "T|
|00003ef0| 79 70 65 22 20 26 20 71 | 75 6f 74 65 20 26 20 22 |ype" & q|uote & "|
|00003f00| 2c 62 67 20 66 6c 64 20 | 22 20 26 20 71 75 6f 74 |,bg fld |" & quot|
|00003f10| 65 20 26 20 22 56 61 6c | 75 65 22 20 26 20 71 75 |e & "Val|ue" & qu|
|00003f20| 6f 74 65 20 69 6e 74 6f | 20 74 68 65 46 6c 64 73 |ote into| theFlds|
|00003f30| 0d 70 75 74 20 74 68 65 | 20 73 63 72 6f 6c 6c 20 |.put the| scroll |
|00003f40| 6f 66 20 6c 61 73 74 20 | 69 74 65 6d 20 6f 66 20 |of last |item of |
|00003f50| 74 68 65 46 6c 64 73 20 | 69 6e 74 6f 20 74 68 65 |theFlds |into the|
|00003f60| 53 63 72 6f 6c 6c 0d 69 | 66 20 28 74 68 65 53 63 |Scroll.i|f (theSc|
|00003f70| 72 6f 6c 6c 20 ad 20 74 | 68 65 20 73 63 72 6f 6c |roll . t|he scrol|
|00003f80| 6c 20 6f 66 20 69 74 65 | 6d 20 31 20 6f 66 20 74 |l of ite|m 1 of t|
|00003f90| 68 65 46 6c 64 73 29 20 | 74 68 65 6e 0d 72 65 70 |heFlds) |then.rep|
|00003fa0| 65 61 74 20 77 69 74 68 | 20 69 20 3d 20 31 20 74 |eat with| i = 1 t|
|00003fb0| 6f 20 28 6e 75 6d 62 65 | 72 20 6f 66 20 69 74 65 |o (numbe|r of ite|
|00003fc0| 6d 73 20 69 6e 20 74 68 | 65 46 6c 64 73 20 2d 20 |ms in th|eFlds - |
|00003fd0| 31 29 0d 73 65 74 20 74 | 68 65 20 73 63 72 6f 6c |1).set t|he scrol|
|00003fe0| 6c 20 6f 66 20 28 69 74 | 65 6d 20 69 20 6f 66 20 |l of (it|em i of |
|00003ff0| 74 68 65 46 6c 64 73 29 | 20 74 6f 20 74 68 65 53 |theFlds)| to theS|
|00004000| 63 72 6f 6c 6c 0d 65 6e | 64 20 72 65 70 65 61 74 |croll.en|d repeat|
|00004010| 0d 65 6e 64 20 69 66 0d | 65 6e 64 20 69 66 0d 70 |.end if.|end if.p|
|00004020| 61 73 73 20 6d 6f 75 73 | 65 57 69 74 68 69 6e 0d |ass mous|eWithin.|
|00004030| 65 6e 64 20 6d 6f 75 73 | 65 57 69 74 68 69 6e 00 |end mous|eWithin.|
|00004040| 00 00 10 a0 43 41 52 44 | 00 00 0b 2d 00 00 00 00 |....CARD|...-....|
|00004050| 00 00 00 00 40 00 00 00 | 00 00 00 00 00 00 00 00 |....@...|........|
|00004060| 00 00 09 bb 00 00 0a 59 | 00 01 00 01 00 00 07 d8 |.......Y|........|
|00004070| 00 03 00 00 00 84 07 d8 | 00 01 02 35 00 10 00 00 |........|...5....|
|00004080| 01 f0 02 00 80 07 00 04 | 00 04 00 00 00 16 00 0a |........|........|
|00004090| 01 00 00 0d 49 6e 64 65 | 78 00 00 6f 6e 20 6d 6f |....Inde|x..on mo|
|000040a0| 75 73 65 55 70 0d 73 65 | 74 20 74 68 65 20 63 75 |useUp.se|t the cu|
|000040b0| 72 73 6f 72 20 74 6f 20 | 62 75 73 79 0d 70 75 74 |rsor to |busy.put|
|000040c0| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 54 65 78 | the sel|ectedTex|
|000040d0| 74 20 6f 66 20 74 68 65 | 20 74 61 72 67 65 74 20 |t of the| target |
|000040e0| 69 6e 74 6f 20 74 68 65 | 49 6e 64 65 78 0d 69 66 |into the|Index.if|
|000040f0| 20 20 20 20 20 20 28 28 | 74 68 65 49 6e 64 65 78 | ((|theIndex|
|00004100| 20 69 73 20 22 2a 22 29 | 20 6f 72 20 28 74 68 65 | is "*")| or (the|
|00004110| 49 6e 64 65 78 20 69 73 | 20 22 a5 22 29 29 20 74 |Index is| ".")) t|
|00004120| 68 65 6e 0d 70 75 74 20 | 66 6c 69 70 54 68 65 6d |hen.put |flipThem|
|00004130| 28 62 67 20 66 6c 64 20 | 22 46 6c 69 70 22 29 20 |(bg fld |"Flip") |
|00004140| 69 6e 74 6f 20 6e 75 6c | 6c 0d 65 6c 73 65 20 69 |into nul|l.else i|
|00004150| 66 20 28 74 68 65 49 6e | 64 65 78 20 69 73 20 6e |f (theIn|dex is n|
|00004160| 6f 74 20 22 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |ot "") t|hen.put |
|00004170| 73 61 79 49 74 28 74 68 | 65 49 6e 64 65 78 29 20 |sayIt(th|eIndex) |
|00004180| 69 6e 74 6f 20 6e 75 6c | 6c 0d 69 66 20 20 20 20 |into nul|l.if |
|00004190| 20 20 28 22 24 44 69 72 | 65 63 74 6f 72 79 24 22 | ("$Dir|ectory$"|
|000041a0| 20 69 73 20 69 6e 20 22 | 24 22 20 26 20 28 77 6f | is in "|$" & (wo|
|000041b0| 72 64 20 31 20 6f 66 20 | 74 68 65 20 73 68 6f 72 |rd 1 of |the shor|
|000041c0| 74 20 6e 61 6d 65 20 6f | 66 20 74 68 69 73 20 73 |t name o|f this s|
|000041d0| 74 61 63 6b 29 20 26 20 | 22 24 22 29 20 74 68 65 |tack) & |"$") the|
|000041e0| 6e 0d 69 66 20 28 28 74 | 68 65 20 6f 70 74 69 6f |n.if ((t|he optio|
|000041f0| 6e 4b 65 79 20 69 73 20 | 64 6f 77 6e 29 20 6f 72 |nKey is |down) or|
|00004200| 20 28 74 68 65 20 73 68 | 69 66 74 4b 65 79 20 69 | (the sh|iftKey i|
|00004210| 73 20 64 6f 77 6e 29 29 | 20 74 68 65 6e 0d 70 75 |s down))| then.pu|
|00004220| 74 20 67 6f 49 74 28 74 | 68 65 49 6e 64 65 78 29 |t goIt(t|heIndex)|
|00004230| 20 69 6e 74 6f 20 6e 75 | 6c 6c 0d 65 6c 73 65 0d | into nu|ll.else.|
|00004240| 6c 6f 63 6b 20 6d 65 73 | 73 61 67 65 73 0d 6c 6f |lock mes|sages.lo|
|00004250| 63 6b 20 73 63 72 65 65 | 6e 0d 70 75 74 20 22 2a |ck scree|n.put "*|
|00004260| 22 20 69 6e 74 6f 20 74 | 68 65 4e 61 6d 65 73 0d |" into t|heNames.|
|00004270| 70 75 74 20 74 68 65 20 | 69 74 65 6d 44 65 6c 69 |put the |itemDeli|
|00004280| 6d 69 74 65 72 20 69 6e | 74 6f 20 6f 72 69 67 69 |miter in|to origi|
|00004290| 6e 61 6c 53 65 74 74 69 | 6e 67 0d 73 65 74 20 74 |nalSetti|ng.set t|
|000042a0| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|000042b0| 20 74 6f 20 22 3a 22 0d | 72 65 70 65 61 74 20 77 | to ":".|repeat w|
|000042c0| 69 74 68 20 69 20 3d 20 | 28 74 68 65 20 6e 75 6d |ith i = |(the num|
|000042d0| 62 65 72 20 6f 66 20 74 | 68 69 73 20 63 64 20 2b |ber of t|his cd +|
|000042e0| 20 31 29 20 74 6f 20 74 | 68 65 20 6e 75 6d 62 65 | 1) to t|he numbe|
|000042f0| 72 20 6f 66 20 63 64 73 | 0d 69 66 20 28 74 68 65 |r of cds|.if (the|
|00004300| 49 6e 64 65 78 20 69 73 | 20 22 2a 41 6c 6c 2a 22 |Index is| "*All*"|
|00004310| 29 20 74 68 65 6e 0d 69 | 66 20 28 69 74 65 6d 20 |) then.i|f (item |
|00004320| 32 20 6f 66 20 74 68 65 | 20 73 68 6f 72 74 20 6e |2 of the| short n|
|00004330| 61 6d 65 20 6f 66 20 63 | 64 20 69 20 69 73 20 6e |ame of c|d i is n|
|00004340| 6f 74 20 22 22 29 20 74 | 68 65 6e 0d 70 75 74 20 |ot "") t|hen.put |
|00004350| 74 68 65 4e 61 6d 65 73 | 20 26 20 72 65 74 75 72 |theNames| & retur|
|00004360| 6e 20 26 20 28 69 74 65 | 6d 20 32 20 6f 66 20 74 |n & (ite|m 2 of t|
|00004370| 68 65 20 73 68 6f 72 74 | 20 6e 61 6d 65 20 6f 66 |he short| name of|
|00004380| 20 63 64 20 69 29 20 69 | 6e 74 6f 20 74 68 65 4e | cd i) i|nto theN|
|00004390| 61 6d 65 73 0d 65 6e 64 | 20 69 66 0d 65 6c 73 65 |ames.end| if.else|
|000043a0| 0d 69 66 20 28 22 24 22 | 20 26 20 74 68 65 49 6e |.if ("$"| & theIn|
|000043b0| 64 65 78 20 26 20 22 3a | 22 20 69 73 20 69 6e 20 |dex & ":|" is in |
|000043c0| 22 24 22 20 26 20 74 68 | 65 20 73 68 6f 72 74 20 |"$" & th|e short |
|000043d0| 6e 61 6d 65 20 6f 66 20 | 63 64 20 69 29 20 74 68 |name of |cd i) th|
|000043e0| 65 6e 0d 70 75 74 20 74 | 68 65 4e 61 6d 65 73 20 |en.put t|heNames |
|000043f0| 26 20 72 65 74 75 72 6e | 20 26 20 28 69 74 65 6d |& return| & (item|
|00004400| 20 32 20 6f 66 20 74 68 | 65 20 73 68 6f 72 74 20 | 2 of th|e short |
|00004410| 6e 61 6d 65 20 6f 66 20 | 63 64 20 69 29 20 69 6e |name of |cd i) in|
|00004420| 74 6f 20 74 68 65 4e 61 | 6d 65 73 0d 65 6e 64 20 |to theNa|mes.end |
|00004430| 69 66 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 72 65 |if.end i|f.end re|
|00004440| 70 65 61 74 0d 73 65 74 | 20 74 68 65 20 69 74 65 |peat.set| the ite|
|00004450| 6d 44 65 6c 69 6d 69 74 | 65 72 20 74 6f 20 6f 72 |mDelimit|er to or|
|00004460| 69 67 69 6e 61 6c 53 65 | 74 74 69 6e 67 0d 70 75 |iginalSe|tting.pu|
|00004470| 74 20 74 68 65 4e 61 6d | 65 73 20 26 20 72 65 74 |t theNam|es & ret|
|00004480| 75 72 6e 20 26 20 22 a5 | 22 20 69 6e 74 6f 20 63 |urn & ".|" into c|
|00004490| 64 20 66 6c 64 20 22 4e | 61 6d 65 73 22 0d 73 65 |d fld "N|ames".se|
|000044a0| 6e 64 20 28 22 73 6f 72 | 74 20 6c 69 6e 65 73 20 |nd ("sor|t lines |
|000044b0| 6f 66 20 63 64 20 66 6c | 64 20 22 20 26 20 71 75 |of cd fl|d " & qu|
|000044c0| 6f 74 65 20 26 20 22 4e | 61 6d 65 73 22 20 26 20 |ote & "N|ames" & |
|000044d0| 71 75 6f 74 65 20 26 20 | 22 20 22 20 26 20 62 67 |quote & |" " & bg|
|000044e0| 20 66 6c 64 20 22 46 6c | 69 70 22 20 26 20 22 20 | fld "Fl|ip" & " |
|000044f0| 69 6e 74 65 72 6e 61 74 | 69 6f 6e 61 6c 22 29 20 |internat|ional") |
|00004500| 74 6f 20 48 79 70 65 72 | 43 61 72 64 0d 75 6e 6c |to Hyper|Card.unl|
|00004510| 6f 63 6b 20 6d 65 73 73 | 61 67 65 73 0d 75 6e 6c |ock mess|ages.unl|
|00004520| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 65 6e 64 20 69 |ock scre|en.end i|
|00004530| 66 0d 65 6c 73 65 20 69 | 66 20 28 22 24 52 65 61 |f.else i|f ("$Rea|
|00004540| 64 24 22 20 20 20 20 20 | 20 69 73 20 69 6e 20 22 |d$" | is in "|
|00004550| 24 22 20 26 20 28 77 6f | 72 64 20 31 20 6f 66 20 |$" & (wo|rd 1 of |
|00004560| 74 68 65 20 73 68 6f 72 | 74 20 6e 61 6d 65 20 6f |the shor|t name o|
|00004570| 66 20 74 68 69 73 20 73 | 74 61 63 6b 29 20 26 20 |f this s|tack) & |
|00004580| 22 24 22 29 20 74 68 65 | 6e 0d 67 6f 20 66 69 72 |"$") the|n.go fir|
|00004590| 73 74 20 63 64 20 6f 66 | 20 62 67 20 22 32 22 0d |st cd of| bg "2".|
|000045a0| 70 75 74 20 74 68 65 20 | 69 74 65 6d 44 65 6c 69 |put the |itemDeli|
|000045b0| 6d 69 74 65 72 20 69 6e | 74 6f 20 6f 72 69 67 69 |miter in|to origi|
|000045c0| 6e 61 6c 53 65 74 74 69 | 6e 67 0d 73 65 74 20 74 |nalSetti|ng.set t|
|000045d0| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|000045e0| 20 74 6f 20 22 3a 22 0d | 70 75 74 20 73 74 61 63 | to ":".|put stac|
|000045f0| 6b 46 6f 6c 64 65 72 28 | 29 20 26 20 22 3a 22 20 |kFolder(|) & ":" |
|00004600| 69 6e 74 6f 20 74 68 65 | 46 6f 6c 64 65 72 0d 70 |into the|Folder.p|
|00004610| 75 74 20 69 74 65 6d 20 | 31 20 6f 66 20 74 68 65 |ut item |1 of the|
|00004620| 46 6f 6c 64 65 72 20 69 | 6e 74 6f 20 74 68 65 46 |Folder i|nto theF|
|00004630| 6f 6c 64 65 72 0d 73 65 | 74 20 74 68 65 20 69 74 |older.se|t the it|
|00004640| 65 6d 44 65 6c 69 6d 69 | 74 65 72 20 74 6f 20 22 |emDelimi|ter to "|
|00004650| 28 22 0d 70 75 74 20 69 | 74 65 6d 20 32 20 6f 66 |(".put i|tem 2 of|
|00004660| 20 74 68 65 20 73 68 6f | 72 74 20 6e 61 6d 65 20 | the sho|rt name |
|00004670| 6f 66 20 74 68 69 73 20 | 73 74 61 63 6b 20 69 6e |of this |stack in|
|00004680| 74 6f 20 74 68 65 46 69 | 6c 65 0d 73 65 74 20 74 |to theFi|le.set t|
|00004690| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|000046a0| 20 74 6f 20 22 29 22 0d | 70 75 74 20 69 74 65 6d | to ")".|put item|
|000046b0| 20 31 20 6f 66 20 74 68 | 65 46 69 6c 65 20 69 6e | 1 of th|eFile in|
|000046c0| 74 6f 20 74 68 65 46 69 | 6c 65 0d 73 65 74 20 74 |to theFi|le.set t|
|000046d0| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|000046e0| 20 74 6f 20 6f 72 69 67 | 69 6e 61 6c 53 65 74 74 | to orig|inalSett|
|000046f0| 69 6e 67 0d 70 75 74 20 | 74 68 65 49 6e 64 65 78 |ing.put |theIndex|
|00004700| 20 69 6e 74 6f 20 62 67 | 20 66 6c 64 20 22 54 69 | into bg| fld "Ti|
|00004710| 74 6c 65 22 0d 6f 70 65 | 6e 20 20 20 20 20 20 66 |tle".ope|n f|
|00004720| 69 6c 65 20 74 68 65 46 | 6f 6c 64 65 72 20 26 20 |ile theF|older & |
|00004730| 22 3a 22 20 26 20 74 68 | 65 46 69 6c 65 20 26 20 |":" & th|eFile & |
|00004740| 22 3a 22 20 26 20 74 68 | 65 49 6e 64 65 78 0d 72 |":" & th|eIndex.r|
|00004750| 65 61 64 20 66 72 6f 6d | 20 66 69 6c 65 20 74 68 |ead from| file th|
|00004760| 65 46 6f 6c 64 65 72 20 | 26 20 22 3a 22 20 26 20 |eFolder |& ":" & |
|00004770| 74 68 65 46 69 6c 65 20 | 26 20 22 3a 22 20 26 20 |theFile |& ":" & |
|00004780| 74 68 65 49 6e 64 65 78 | 20 75 6e 74 69 6c 20 65 |theIndex| until e|
|00004790| 6e 64 0d 63 6c 6f 73 65 | 20 20 20 20 20 66 69 6c |nd.close| fil|
|000047a0| 65 20 74 68 65 46 6f 6c | 64 65 72 20 26 20 22 3a |e theFol|der & ":|
|000047b0| 22 20 26 20 74 68 65 46 | 69 6c 65 20 26 20 22 3a |" & theF|ile & ":|
|000047c0| 22 20 26 20 74 68 65 49 | 6e 64 65 78 0d 70 75 74 |" & theI|ndex.put|
|000047d0| 20 6c 69 6e 65 20 31 20 | 74 6f 20 33 39 20 6f 66 | line 1 |to 39 of|
|000047e0| 20 69 74 20 69 6e 74 6f | 20 62 67 20 66 6c 64 20 | it into| bg fld |
|000047f0| 22 54 65 78 74 22 0d 70 | 75 74 20 22 31 22 20 69 |"Text".p|ut "1" i|
|00004800| 6e 74 6f 20 62 67 20 66 | 6c 64 20 22 52 65 61 64 |nto bg f|ld "Read|
|00004810| 22 0d 65 6c 73 65 0d 70 | 75 74 20 67 6f 49 74 28 |".else.p|ut goIt(|
|00004820| 74 68 65 49 6e 64 65 78 | 29 20 69 6e 74 6f 20 6e |theIndex|) into n|
|00004830| 75 6c 6c 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 69 |ull.end |if.end i|
|00004840| 66 0d 65 6e 64 20 6d 6f | 75 73 65 55 70 00 00 04 |f.end mo|useUp...|
|00004850| 00 08 00 28 49 6e 64 65 | 78 29 ff ff 00 38 00 2a |...(Inde|x)...8.*|
|00004860| 0d 43 44 2d 52 4f 4d 3a | 44 6f 6e 65 0d 43 44 2d |.CD-ROM:|Done.CD-|
|00004870| 52 4f 4d 3a 54 6f 44 6f | 0d 53 79 73 74 65 6d 20 |ROM:ToDo|.System |
|00004880| 49 6e 66 6f 20 7c 20 4d | 61 63 69 6e 74 6f 73 68 |Info | M|acintosh|
|00004890| 20 48 44 3a 0d a5 00 03 | 00 38 00 2a 0d 43 44 2d | HD:....|.8.*.CD-|
|000048a0| 52 4f 4d 3a 44 6f 6e 65 | 0d 43 44 2d 52 4f 4d 3a |ROM:Done|.CD-ROM:|
|000048b0| 54 6f 44 6f 0d 53 79 73 | 74 65 6d 20 49 6e 66 6f |ToDo.Sys|tem Info|
|000048c0| 20 7c 20 4d 61 63 69 6e | 74 6f 73 68 20 48 44 3a | | Macin|tosh HD:|
|000048d0| 0d a5 28 49 6e 64 65 78 | 29 00 6f 6e 20 63 6c 6f |..(Index|).on clo|
|000048e0| 73 65 43 61 72 64 0d 69 | 66 20 28 22 2a 22 20 69 |seCard.i|f ("*" i|
|000048f0| 73 20 6e 6f 74 20 69 6e | 20 74 68 65 20 73 68 6f |s not in| the sho|
|00004900| 72 74 20 6e 61 6d 65 20 | 6f 66 20 74 68 69 73 20 |rt name |of this |
|00004910| 73 74 61 63 6b 29 20 74 | 68 65 6e 20 70 75 74 20 |stack) t|hen put |
|00004920| 63 64 20 66 6c 64 20 22 | 49 6e 64 65 78 22 20 69 |cd fld "|Index" i|
|00004930| 6e 74 6f 20 62 67 20 66 | 6c 64 20 22 54 65 78 74 |nto bg f|ld "Text|
|00004940| 22 0d 70 61 73 73 20 63 | 6c 6f 73 65 43 61 72 64 |".pass c|loseCard|
|00004950| 0d 65 6e 64 20 63 6c 6f | 73 65 43 61 72 64 0d 0d |.end clo|seCard..|
|00004960| 6f 6e 20 6f 70 65 6e 43 | 61 72 64 0d 73 65 74 20 |on openC|ard.set |
|00004970| 74 68 65 20 63 75 72 73 | 6f 72 20 74 6f 20 62 75 |the curs|or to bu|
|00004980| 73 79 0d 6c 6f 63 6b 20 | 6d 65 73 73 61 67 65 73 |sy.lock |messages|
|00004990| 0d 6c 6f 63 6b 20 73 63 | 72 65 65 6e 0d 69 66 20 |.lock sc|reen.if |
|000049a0| 28 62 67 20 66 6c 64 20 | 22 54 65 78 74 22 20 69 |(bg fld |"Text" i|
|000049b0| 73 20 22 22 29 20 74 68 | 65 6e 0d 70 75 74 20 22 |s "") th|en.put "|
|000049c0| 2a 22 20 69 6e 74 6f 20 | 74 68 65 49 6e 64 65 78 |*" into |theIndex|
|000049d0| 0d 69 66 20 20 20 20 20 | 20 28 22 24 44 69 72 65 |.if | ("$Dire|
|000049e0| 63 74 6f 72 79 24 22 20 | 69 73 20 69 6e 20 22 24 |ctory$" |is in "$|
|000049f0| 22 20 26 20 28 77 6f 72 | 64 20 31 20 6f 66 20 74 |" & (wor|d 1 of t|
|00004a00| 68 65 20 73 68 6f 72 74 | 20 6e 61 6d 65 20 6f 66 |he short| name of|
|00004a10| 20 74 68 69 73 20 73 74 | 61 63 6b 29 20 26 20 22 | this st|ack) & "|
|00004a20| 24 22 29 20 74 68 65 6e | 0d 70 75 74 20 74 68 65 |$") then|.put the|
|00004a30| 49 6e 64 65 78 20 26 20 | 72 65 74 75 72 6e 20 26 |Index & |return &|
|00004a40| 20 22 2a 41 6c 6c 2a 22 | 20 69 6e 74 6f 20 74 68 | "*All*"| into th|
|00004a50| 65 49 6e 64 65 78 0d 70 | 75 74 20 74 68 65 20 69 |eIndex.p|ut the i|
|00004a60| 74 65 6d 44 65 6c 69 6d | 69 74 65 72 20 69 6e 74 |temDelim|iter int|
|00004a70| 6f 20 6f 72 69 67 69 6e | 61 6c 53 65 74 74 69 6e |o origin|alSettin|
|00004a80| 67 0d 73 65 74 20 74 68 | 65 20 69 74 65 6d 44 65 |g.set th|e itemDe|
|00004a90| 6c 69 6d 69 74 65 72 20 | 74 6f 20 22 3a 22 0d 72 |limiter |to ":".r|
|00004aa0| 65 70 65 61 74 20 77 69 | 74 68 20 69 20 3d 20 28 |epeat wi|th i = (|
|00004ab0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|00004ac0| 69 73 20 63 64 20 2b 20 | 31 29 20 74 6f 20 74 68 |is cd + |1) to th|
|00004ad0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 64 73 0d |e number| of cds.|
|00004ae0| 69 66 20 28 69 74 65 6d | 20 32 20 6f 66 20 74 68 |if (item| 2 of th|
|00004af0| 65 20 73 68 6f 72 74 20 | 6e 61 6d 65 20 6f 66 20 |e short |name of |
|00004b00| 63 64 20 69 20 69 73 20 | 22 22 29 20 74 68 65 6e |cd i is |"") then|
|00004b10| 0d 70 75 74 20 74 68 65 | 49 6e 64 65 78 20 26 20 |.put the|Index & |
|00004b20| 72 65 74 75 72 6e 20 26 | 20 28 69 74 65 6d 20 31 |return &| (item 1|
|00004b30| 20 6f 66 20 74 68 65 20 | 73 68 6f 72 74 20 6e 61 | of the |short na|
|00004b40| 6d 65 20 6f 66 20 63 64 | 20 69 29 20 69 6e 74 6f |me of cd| i) into|
|00004b50| 20 74 68 65 49 6e 64 65 | 78 0d 65 6e 64 20 69 66 | theInde|x.end if|
|00004b60| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 73 65 74 20 |.end rep|eat.set |
|00004b70| 74 68 65 20 69 74 65 6d | 44 65 6c 69 6d 69 74 65 |the item|Delimite|
|00004b80| 72 20 74 6f 20 6f 72 69 | 67 69 6e 61 6c 53 65 74 |r to ori|ginalSet|
|00004b90| 74 69 6e 67 0d 73 65 6e | 64 20 28 22 6d 6f 75 73 |ting.sen|d ("mous|
|00004ba0| 65 55 70 22 29 20 74 6f | 20 63 64 20 66 6c 64 20 |eUp") to| cd fld |
|00004bb0| 22 49 6e 64 65 78 22 0d | 65 6c 73 65 20 69 66 20 |"Index".|else if |
|00004bc0| 28 22 24 52 65 61 64 24 | 22 20 20 20 20 20 20 69 |("$Read$|" i|
|00004bd0| 73 20 69 6e 20 22 24 22 | 20 26 20 28 77 6f 72 64 |s in "$"| & (word|
|00004be0| 20 31 20 6f 66 20 74 68 | 65 20 73 68 6f 72 74 20 | 1 of th|e short |
|00004bf0| 6e 61 6d 65 20 6f 66 20 | 74 68 69 73 20 73 74 61 |name of |this sta|
|00004c00| 63 6b 29 20 26 20 22 24 | 22 29 20 74 68 65 6e 0d |ck) & "$|") then.|
|00004c10| 70 75 74 20 74 68 65 20 | 69 74 65 6d 44 65 6c 69 |put the |itemDeli|
|00004c20| 6d 69 74 65 72 20 69 6e | 74 6f 20 6f 72 69 67 69 |miter in|to origi|
|00004c30| 6e 61 6c 53 65 74 74 69 | 6e 67 0d 73 65 74 20 74 |nalSetti|ng.set t|
|00004c40| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|00004c50| 20 74 6f 20 22 3a 22 0d | 70 75 74 20 73 74 61 63 | to ":".|put stac|
|00004c60| 6b 46 6f 6c 64 65 72 28 | 29 20 26 20 22 3a 22 20 |kFolder(|) & ":" |
|00004c70| 69 6e 74 6f 20 74 68 65 | 46 6f 6c 64 65 72 0d 70 |into the|Folder.p|
|00004c80| 75 74 20 69 74 65 6d 20 | 31 20 6f 66 20 74 68 65 |ut item |1 of the|
|00004c90| 46 6f 6c 64 65 72 20 69 | 6e 74 6f 20 74 68 65 46 |Folder i|nto theF|
|00004ca0| 6f 6c 64 65 72 0d 73 65 | 74 20 74 68 65 20 69 74 |older.se|t the it|
|00004cb0| 65 6d 44 65 6c 69 6d 69 | 74 65 72 20 74 6f 20 22 |emDelimi|ter to "|
|00004cc0| 28 22 0d 70 75 74 20 69 | 74 65 6d 20 32 20 6f 66 |(".put i|tem 2 of|
|00004cd0| 20 74 68 65 20 73 68 6f | 72 74 20 6e 61 6d 65 20 | the sho|rt name |
|00004ce0| 6f 66 20 74 68 69 73 20 | 73 74 61 63 6b 20 69 6e |of this |stack in|
|00004cf0| 74 6f 20 74 68 65 46 69 | 6c 65 0d 73 65 74 20 74 |to theFi|le.set t|
|00004d00| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|00004d10| 20 74 6f 20 22 29 22 0d | 70 75 74 20 69 74 65 6d | to ")".|put item|
|00004d20| 20 31 20 6f 66 20 74 68 | 65 46 69 6c 65 20 69 6e | 1 of th|eFile in|
|00004d30| 74 6f 20 74 68 65 46 69 | 6c 65 0d 73 65 74 20 74 |to theFi|le.set t|
|00004d40| 68 65 20 69 74 65 6d 44 | 65 6c 69 6d 69 74 65 72 |he itemD|elimiter|
|00004d50| 20 74 6f 20 6f 72 69 67 | 69 6e 61 6c 53 65 74 74 | to orig|inalSett|
|00004d60| 69 6e 67 0d 70 75 74 20 | 74 68 65 49 6e 64 65 78 |ing.put |theIndex|
|00004d70| 20 26 20 72 65 74 75 72 | 6e 20 26 20 6c 69 73 74 | & retur|n & list|
|00004d80| 46 69 6c 65 73 28 74 68 | 65 46 6f 6c 64 65 72 20 |Files(th|eFolder |
|00004d90| 26 20 22 3a 22 20 26 20 | 74 68 65 46 69 6c 65 2c |& ":" & |theFile,|
|00004da0| 29 20 69 6e 74 6f 20 74 | 68 65 49 6e 64 65 78 0d |) into t|heIndex.|
|00004db0| 65 6c 73 65 0d 72 65 70 | 65 61 74 20 77 69 74 68 |else.rep|eat with|
|00004dc0| 20 69 20 3d 20 28 74 68 | 65 20 6e 75 6d 62 65 72 | i = (th|e number|
|00004dd0| 20 6f 66 20 74 68 69 73 | 20 63 64 20 2b 20 31 29 | of this| cd + 1)|
|00004de0| 20 74 6f 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f | to the |number o|
|00004df0| 66 20 63 64 73 0d 70 75 | 74 20 74 68 65 49 6e 64 |f cds.pu|t theInd|
|00004e00| 65 78 20 26 20 72 65 74 | 75 72 6e 20 26 20 28 74 |ex & ret|urn & (t|
|00004e10| 68 65 20 73 68 6f 72 74 | 20 6e 61 6d 65 20 6f 66 |he short| name of|
|00004e20| 20 63 64 20 69 29 20 69 | 6e 74 6f 20 74 68 65 49 | cd i) i|nto theI|
|00004e30| 6e 64 65 78 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |ndex.end| repeat.|
|00004e40| 65 6e 64 20 69 66 0d 70 | 75 74 20 74 68 65 49 6e |end if.p|ut theIn|
|00004e50| 64 65 78 20 26 20 72 65 | 74 75 72 6e 20 26 20 22 |dex & re|turn & "|
|00004e60| a5 22 20 69 6e 74 6f 20 | 63 64 20 66 6c 64 20 22 |." into |cd fld "|
|00004e70| 49 6e 64 65 78 22 0d 73 | 65 6e 64 20 28 22 73 6f |Index".s|end ("so|
|00004e80| 72 74 20 6c 69 6e 65 73 | 20 6f 66 20 63 64 20 66 |rt lines| of cd f|
|00004e90| 6c 64 20 22 20 26 20 71 | 75 6f 74 65 20 26 20 22 |ld " & q|uote & "|
|00004ea0| 49 6e 64 65 78 22 20 26 | 20 71 75 6f 74 65 20 26 |Index" &| quote &|
|00004eb0| 20 22 20 22 20 26 20 62 | 67 20 66 6c 64 20 22 46 | " " & b|g fld "F|
|00004ec0| 6c 69 70 22 20 26 20 22 | 20 69 6e 74 65 72 6e 61 |lip" & "| interna|
|00004ed0| 74 69 6f 6e 61 6c 22 29 | 20 74 6f 20 48 79 70 65 |tional")| to Hype|
|00004ee0| 72 43 61 72 64 0d 72 65 | 70 65 61 74 20 77 69 74 |rCard.re|peat wit|
|00004ef0| 68 20 69 20 3d 20 31 20 | 74 6f 20 74 68 65 20 6e |h i = 1 |to the n|
|00004f00| 75 6d 62 65 72 20 6f 66 | 20 63 64 20 66 6c 64 73 |umber of| cd flds|
|00004f10| 0d 69 66 20 28 74 68 65 | 20 73 74 79 6c 65 20 6f |.if (the| style o|
|00004f20| 66 20 63 64 20 66 6c 64 | 20 69 20 69 73 20 73 63 |f cd fld| i is sc|
|00004f30| 72 6f 6c 6c 69 6e 67 29 | 20 74 68 65 6e 20 73 65 |rolling)| then se|
|00004f40| 74 20 74 68 65 20 73 63 | 72 6f 6c 6c 20 6f 66 20 |t the sc|roll of |
|00004f50| 63 64 20 66 6c 64 20 69 | 20 74 6f 20 30 0d 65 6e |cd fld i| to 0.en|
|00004f60| 64 20 72 65 70 65 61 74 | 0d 65 6c 73 65 0d 70 75 |d repeat|.else.pu|
|00004f70| 74 20 62 67 20 66 6c 64 | 20 22 54 65 78 74 22 20 |t bg fld| "Text" |
|00004f80| 69 6e 74 6f 20 63 64 20 | 66 6c 64 20 22 49 6e 64 |into cd |fld "Ind|
|00004f90| 65 78 22 0d 65 6e 64 20 | 69 66 0d 69 66 20 28 22 |ex".end |if.if ("|
|00004fa0| 2a 22 20 69 73 20 69 6e | 20 74 68 65 20 73 68 6f |*" is in| the sho|
|00004fb0| 72 74 20 6e 61 6d 65 20 | 6f 66 20 74 68 69 73 20 |rt name |of this |
|00004fc0| 73 74 61 63 6b 29 20 74 | 68 65 6e 0d 73 65 6e 64 |stack) t|hen.send|
|00004fd0| 20 28 62 67 20 66 6c 64 | 20 22 54 65 78 74 22 29 | (bg fld| "Text")|
|00004fe0| 20 74 6f 20 48 79 70 65 | 72 43 61 72 64 0d 68 69 | to Hype|rCard.hi|
|00004ff0| 64 65 20 63 64 20 66 6c | 64 20 22 49 6e 64 65 78 |de cd fl|d "Index|
|00005000| 22 0d 73 65 6e 64 20 28 | 22 64 6f 4d 65 6e 75 20 |".send (|"doMenu |
|00005010| 22 20 26 20 71 75 6f 74 | 65 20 26 20 22 43 6c 6f |" & quot|e & "Clo|
|00005020| 73 65 20 53 74 61 63 6b | 22 20 26 20 71 75 6f 74 |se Stack|" & quot|
|00005030| 65 20 26 20 22 2c 22 20 | 26 20 71 75 6f 74 65 20 |e & "," |& quote |
|00005040| 26 20 22 46 69 6c 65 22 | 20 26 20 71 75 6f 74 65 |& "File"| & quote|
|00005050| 29 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 65 |) to Hyp|erCard.e|
|00005060| 6e 64 20 69 66 0d 63 68 | 6f 6f 73 65 20 62 72 6f |nd if.ch|oose bro|
|00005070| 77 73 65 20 74 6f 6f 6c | 0d 75 6e 6c 6f 63 6b 20 |wse tool|.unlock |
|00005080| 6d 65 73 73 61 67 65 73 | 0d 75 6e 6c 6f 63 6b 20 |messages|.unlock |
|00005090| 73 63 72 65 65 6e 20 77 | 69 74 68 20 76 69 73 75 |screen w|ith visu|
|000050a0| 61 6c 20 65 66 66 65 63 | 74 20 64 69 73 73 6f 6c |al effec|t dissol|
|000050b0| 76 65 20 66 61 73 74 0d | 70 61 73 73 20 6f 70 65 |ve fast.|pass ope|
|000050c0| 6e 43 61 72 64 0d 65 6e | 64 20 6f 70 65 6e 43 61 |nCard.en|d openCa|
|000050d0| 72 64 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |rd......|........|
|000050e0| 00 00 00 80 43 41 52 44 | 00 00 11 99 00 00 00 00 |....CARD|........|
|000050f0| 00 00 00 00 40 00 00 00 | 00 00 00 00 00 00 00 00 |....@...|........|
|00005100| 00 00 09 bb 00 00 0e 02 | 00 00 00 00 00 00 00 00 |........|........|
|00005110| 00 02 00 00 00 26 00 03 | 00 0c 00 43 44 2d 52 4f |.....&..|...CD-RO|
|00005120| 4d 3a 44 6f 6e 65 00 02 | 00 12 00 a5 20 44 69 6e |M:Done..|.... Din|
|00005130| 6f 73 61 75 72 20 53 61 | 66 61 72 69 43 44 2d 52 |osaur Sa|fariCD-R|
|00005140| 4f 4d 3a 44 6f 6e 65 00 | 00 00 00 00 00 00 00 00 |OM:Done.|........|
|00005150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005160| 00 00 00 80 43 41 52 44 | 00 00 0f cf 00 00 00 00 |....CARD|........|
|00005170| 00 00 00 00 40 00 00 00 | 00 00 00 00 00 00 00 00 |....@...|........|
|00005180| 00 00 09 bb 00 00 0e 02 | 00 00 00 00 00 00 00 00 |........|........|
|00005190| 00 02 00 00 00 28 00 03 | 00 0c 00 43 44 2d 52 4f |.....(..|...CD-RO|
|000051a0| 4d 3a 54 6f 44 6f 00 02 | 00 14 00 a5 20 54 68 65 |M:ToDo..|.... The|
|000051b0| 20 46 61 6d 69 6c 79 20 | 44 6f 63 74 6f 72 43 44 | Family |DoctorCD|
|000051c0| 2d 52 4f 4d 3a 54 6f 44 | 6f 00 00 00 00 00 00 00 |-ROM:ToD|o.......|
|000051d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000051e0| 00 00 01 40 43 41 52 44 | 00 00 10 ce 00 00 00 00 |...@CARD|........|
|000051f0| 00 00 00 00 40 00 00 00 | 00 00 00 00 00 00 00 00 |....@...|........|
|00005200| 00 00 09 bb 00 00 0e 02 | 00 00 00 00 00 00 00 00 |........|........|
|00005210| 00 02 00 00 00 d2 00 03 | 00 1c 00 53 79 73 74 65 |........|...Syste|
|00005220| 6d 20 49 6e 66 6f 20 7c | 20 4d 61 63 69 6e 74 6f |m Info || Macinto|
|00005230| 73 68 20 48 44 3a 00 02 | 00 ae 00 31 39 39 34 2d |sh HD:..|...1994-|
|00005240| 31 32 2d 33 31 0d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |12-31.--|--------|
|00005250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005290| 2d 2d 2d 2d 2d 2d 2d 0d | a5 20 47 6f 20 53 69 6d |-------.|. Go Sim|
|000052a0| 6f 6e 20 53 75 6e 61 74 | 6f 72 69 0d 20 20 a5 20 |on Sunat|ori. . |
|000052b0| 48 79 70 65 72 49 6e 66 | 6f 20 46 6f 6c 64 65 72 |HyperInf|o Folder|
|000052c0| 0d 20 20 20 20 a5 20 48 | 79 70 65 72 49 6e 66 6f |. . H|yperInfo|
|000052d0| 0d 20 20 20 20 a5 20 48 | 79 70 65 72 49 6e 66 6f |. . H|yperInfo|
|000052e0| 20 53 74 61 63 6b 73 0d | 53 79 73 74 65 6d 20 49 | Stacks.|System I|
|000052f0| 6e 66 6f 20 7c 20 4d 61 | 63 69 6e 74 6f 73 68 20 |nfo | Ma|cintosh |
|00005300| 48 44 3a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |HD:.....|........|
|00005310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005320| 00 00 00 20 53 54 42 4c | 00 00 0c be 00 00 00 00 |... STBL|........|
|00005330| 00 00 00 00 00 00 00 01 | 00 00 00 00 00 00 00 00 |........|........|
|00005340| 00 00 00 40 46 54 42 4c | 00 00 0d a1 00 00 00 00 |...@FTBL|........|
|00005350| 00 00 00 01 00 00 00 00 | 00 16 43 6f 75 72 69 65 |........|..Courie|
|00005360| 72 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |r.......|........|
|00005370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005380| 00 00 00 20 54 41 49 4c | ff ff ff ff 00 00 00 00 |... TAIL|........|
|00005390| 0f 4e 75 20 8a 72 20 64 | 65 74 20 73 6c 75 74 c9 |.Nu .r d|et slut.|
+--------+-------------------------+-------------------------+--------+--------+